home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1999-04-28 | 27.4 KB | [TgPj/RBv2] |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
|
|
| id metadata |
|---|
| key | value |
|---|
| macFileType | [TgPj] |
| macFileCreator | [RBv2] |
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0b 11 00 00 41 41 41 41 | 41 41 41 41 41 41 41 41 |....AAAA|AAAAAAAA|
|00000010| 41 41 41 41 01 04 3f 3f | 3f 3f 41 00 01 01 00 00 |AAAA..??|??A.....|
|00000020| 07 41 70 70 4e 61 6d 65 | 80 80 80 01 80 80 80 01 |.AppName|........|
|00000030| 01 00 00 00 00 00 00 00 | 06 69 63 73 23 80 01 01 |........|.ics#...|
|00000040| 80 06 60 08 10 08 90 08 | 10 0c b0 33 4c 20 84 22 |..`.....|...3L ."|
|00000050| 14 60 86 a2 17 99 9f 66 | 7e 18 78 06 e0 01 80 01 |.`.....f|~.x.....|
|00000060| 80 07 e0 0f f0 0f f0 0f | f0 0f f0 3f fc 3f fc 3f |........|...?.?.?|
|00000070| fc 7f fe ff ff ff ff 7f | fe 1f f8 07 e0 01 80 49 |........|.......I|
|00000080| 43 4e 23 80 04 00 01 80 | 00 00 06 60 00 00 18 18 |CN#.....|...`....|
|00000090| 00 00 60 06 00 00 48 0a | 00 00 42 22 00 00 40 8a |..`...H.|..B"..@.|
|000000a0| 00 00 40 22 00 00 40 8a | 00 00 40 22 00 00 40 8a |..@"..@.|..@"..@.|
|000000b0| 00 00 60 26 00 01 98 99 | 80 06 06 60 60 18 01 80 |..`&....|...``...|
|000000c0| 18 12 02 20 28 10 88 88 | 88 10 22 02 28 30 08 80 |... (...|..".(0..|
|000000d0| 8c 70 22 02 2a 90 08 80 | 8d b0 22 02 2b 98 09 80 |.p".*...|..".+...|
|000000e0| 99 a6 26 62 67 69 98 19 | 9e 1a 60 06 78 06 80 01 |..&bgi..|..`.x...|
|000000f0| e0 01 a0 07 80 00 68 1e | 00 00 1a 78 00 00 06 e0 |......h.|...x....|
|00000100| 00 00 01 80 00 00 01 80 | 00 00 07 e0 00 00 1f f8 |........|........|
|00000110| 00 00 7f fe 00 00 7f fe | 00 00 7f fe 00 00 7f fe |........|........|
|00000120| 00 00 7f fe 00 00 7f fe | 00 00 7f fe 00 00 7f fe |........|........|
|00000130| 00 00 7f fe 00 01 ff ff | 80 07 ff ff e0 1f ff ff |........|........|
|00000140| f8 1f ff ff f8 1f ff ff | f8 1f ff ff f8 3f ff ff |........|.....?..|
|00000150| fc 7f ff ff fe ff ff ff | ff ff ff ff ff ff ff ff |........|........|
|00000160| ff ff ff ff ff 7f ff ff | fe 1f ff ff f8 07 ff ff |........|........|
|00000170| e0 01 ff ff 80 00 7f fe | 00 00 1f f8 00 00 07 e0 |........|........|
|00000180| 00 00 01 80 00 69 63 73 | 34 80 02 00 00 00 0f f0 |.....ics|4.......|
|00000190| 00 00 00 00 00 0f f8 8f | f0 00 00 00 00 f8 88 88 |........|........|
|000001a0| 9f 00 00 00 00 f8 88 99 | 9f 00 00 00 00 f8 88 99 |........|........|
|000001b0| 9f 00 00 00 00 f8 88 99 | 9f 00 00 00 ff cc 88 99 |........|........|
|000001c0| 11 ff 00 00 fc cc cc 11 | 11 1f 00 00 fc c3 73 21 |........|......s!|
|000001d0| 22 2f 00 0f fc c7 37 12 | 12 2f f0 fc fc c3 73 21 |"/....7.|./....s!|
|000001e0| 22 2f df f0 cf f7 3f f2 | 1f fd df 0f f0 cf fc cf |"/....?.|........|
|000001f0| fd df f0 00 0f f0 cc cd | df f0 00 00 00 0f f0 df |........|........|
|00000200| f0 00 00 00 00 00 0f f0 | 00 00 00 69 63 73 38 80 |........|...ics8.|
|00000210| 04 00 00 00 00 00 00 00 | ff ff 00 00 00 00 00 00 |........|........|
|00000220| 00 00 00 00 00 00 ff ff | e1 e1 ff ff 00 00 00 00 |........|........|
|00000230| 00 00 00 00 00 ff e3 e1 | e1 e1 e1 e5 ff 00 00 00 |........|........|
|00000240| 00 00 00 00 00 ff e3 e3 | e3 e5 e5 e5 ff 00 00 00 |........|........|
|00000250| 00 00 00 00 00 ff e3 e3 | e3 e5 e5 e5 ff 00 00 00 |........|........|
|00000260| 00 00 00 00 00 ff e3 e3 | e3 e5 e5 e5 ff 00 00 00 |........|........|
|00000270| 00 00 00 ff ff 2a 2a e3 | e3 e5 e5 0b 0b ff ff 00 |.....**.|........|
|00000280| 00 00 00 ff 2a 2a 2a 2a | 2a 0b 0b 0b 0b 0b ff 00 |....****|*.......|
|00000290| 00 00 00 ff 54 54 7f 7f | 7f 11 11 11 17 17 ff 00 |....TT..|........|
|000002a0| 00 00 ff ff 54 54 7f 7f | 7f 11 11 11 17 17 ff ff |....TT..|........|
|000002b0| 00 ff f6 ff 54 54 7f 7f | 7f 11 11 11 17 17 ff f9 |....TT..|........|
|000002c0| ff ff f6 f6 ff ff 7f 7f | ff ff 11 11 ff ff f9 f9 |........|........|
|000002d0| ff 00 ff ff f6 f6 ff ff | f7 f7 ff ff f9 f9 ff ff |........|........|
|000002e0| 00 00 00 00 ff ff f6 f6 | f7 f7 f9 f9 ff ff 00 00 |........|........|
|000002f0| 00 00 00 00 00 00 ff ff | f6 f9 ff ff 00 00 00 00 |........|........|
|00000300| 00 00 00 00 00 00 00 00 | ff ff 00 00 00 00 00 00 |........|........|
|00000310| 00 69 63 6c 34 80 08 00 | 00 00 00 00 00 00 0f f0 |.icl4...|........|
|00000320| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 0f f8 8f |........|........|
|00000330| f0 00 00 00 00 00 00 00 | 00 00 00 00 0f f8 88 88 |........|........|
|00000340| 8f f0 00 00 00 00 00 00 | 00 00 00 0f f8 88 88 88 |........|........|
|00000350| 88 8f f0 00 00 00 00 00 | 00 00 00 0f 88 08 88 88 |........|........|
|00000360| 88 89 f0 00 00 00 00 00 | 00 00 00 0f 88 88 08 88 |........|........|
|00000370| 89 99 f0 00 00 00 00 00 | 00 00 00 0f 88 88 88 09 |........|........|
|00000380| 99 99 f0 00 00 00 00 00 | 00 00 00 0f 88 88 88 99 |........|........|
|00000390| 99 99 f0 00 00 00 00 00 | 00 00 00 0f 88 88 88 89 |........|........|
|000003a0| 99 99 f0 00 00 00 00 00 | 00 00 00 0f 88 88 88 99 |........|........|
|000003b0| 99 99 f0 00 00 00 00 00 | 00 00 00 0f 88 88 88 89 |........|........|
|000003c0| 99 99 f0 00 00 00 00 00 | 00 00 00 0f 88 88 88 99 |........|........|
|000003d0| 99 99 f0 00 00 00 00 00 | 00 00 0f fc c8 88 88 89 |........|........|
|000003e0| 99 91 1f f0 00 00 00 00 | 00 0f fc cc cc c8 88 99 |........|........|
|000003f0| 91 11 11 1f f0 00 00 00 | 0f fc cc cc cc cc cc 71 |........|.......q|
|00000400| 11 11 11 11 1f f0 00 00 | 0f cc 0c cc cc cc 37 22 |........|......7"|
|00000410| 01 11 11 11 12 f0 00 00 | 0f cc cc 0c cc 73 73 71 |........|.....ssq|
|00000420| 21 01 11 12 22 f0 00 00 | 0f cc cc cc 07 37 37 22 |!..."...|.....77"|
|00000430| 12 12 02 22 22 f0 00 00 | ff cc cc cc 73 73 73 71 |...""...|....sssq|
|00000440| 21 21 22 22 22 ff 00 0f | 0f cc cc cc c7 37 37 22 |!!"""...|.....77"|
|00000450| 12 12 12 22 22 fd f0 f0 | cf cc cc cc 73 73 73 71 |...""...|....sssq|
|00000460| 21 21 22 22 22 fc df fc | cf cc cc cc c7 37 37 22 |!!"""...|.....77"|
|00000470| 12 12 12 22 22 fc cf fc | 0f fc cc cc 73 73 7f f1 |...""...|....ss..|
|00000480| 21 21 22 22 2f fc df fc | cc 0f fc cc c7 3f fd df |!!""/...|.....?..|
|00000490| f2 12 12 2f fc dd df 0f | fc cc 0f fc 7f fd dd dc |.../....|........|
|000004a0| cf f1 2f fc dd df f0 00 | 0f fc cc 0f fd dd cc cc |../.....|........|
|000004b0| cc cf fc dd df f0 00 00 | 00 0f fc cc 00 cc cc cc |........|........|
|000004c0| cc cc dd df f0 00 00 00 | 00 00 0f fc cc 00 cc cc |........|........|
|000004d0| cc dd df f0 00 00 00 00 | 00 00 00 0f fc cc 00 cc |........|........|
|000004e0| dd df f0 00 00 00 00 00 | 00 00 00 00 0f fc cc dd |........|........|
|000004f0| df f0 00 00 00 00 00 00 | 00 00 00 00 00 0f fc df |........|........|
|00000500| f0 00 00 00 00 00 00 00 | 00 00 00 00 00 00 0f f0 |........|........|
|00000510| 00 00 00 00 00 00 00 69 | 63 6c 38 80 10 00 00 00 |.......i|cl8.....|
|00000520| 00 00 00 00 00 00 00 00 | 00 00 00 00 ff ff 00 00 |........|........|
|00000530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000540| 00 00 00 00 00 00 00 00 | 00 00 ff ff e1 e1 ff ff |........|........|
|00000550| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000560| 00 00 00 00 00 00 00 00 | ff ff e1 e1 e1 e1 e1 e1 |........|........|
|00000570| ff ff 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000580| 00 00 00 00 00 00 ff ff | e1 e1 e1 e1 e1 e1 e1 e1 |........|........|
|00000590| e1 e1 ff ff 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005a0| 00 00 00 00 00 00 ff e3 | e3 00 e1 e1 e1 e1 e1 e1 |........|........|
|000005b0| e1 e3 e5 ff 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005c0| 00 00 00 00 00 00 ff e3 | e3 e3 e3 00 e1 e1 e1 e3 |........|........|
|000005d0| e5 e5 e5 ff 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005e0| 00 00 00 00 00 00 ff e3 | e3 e3 e3 e3 e3 00 e5 e5 |........|........|
|000005f0| e5 e5 e5 ff 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000600| 00 00 00 00 00 00 ff e3 | e3 e3 e3 e3 e3 e5 e5 e5 |........|........|
|00000610| e5 e5 e5 ff 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000620| 00 00 00 00 00 00 ff e3 | e3 e3 e3 e3 e3 e3 e5 e5 |........|........|
|00000630| e5 e5 e5 ff 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000640| 00 00 00 00 00 00 ff e3 | e3 e3 e3 e3 e3 e5 e5 e5 |........|........|
|00000650| e5 e5 e5 ff 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000660| 00 00 00 00 00 00 ff e3 | e3 e3 e3 e3 e3 e3 e5 e5 |........|........|
|00000670| e5 e5 e5 ff 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000680| 00 00 00 00 00 00 ff e3 | e3 e3 e3 e3 e3 e5 e5 e5 |........|........|
|00000690| e5 e5 e5 ff 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006a0| 00 00 00 00 ff ff 2a 2a | e3 e3 e3 e3 e3 e3 e5 e5 |......**|........|
|000006b0| e5 e5 0b 0b ff ff 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006c0| 00 00 ff ff 2a 2a 2a 2a | 2a 2a e3 e3 e3 e5 e5 e5 |....****|**......|
|000006d0| 0b 0b 0b 0b 0b 0b ff ff | 00 00 00 00 00 00 00 00 |........|........|
|000006e0| ff ff 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 54 0b 0b |..******|*****T..|
|000006f0| 0b 0b 0b 0b 0b 0b 0b 0b | ff ff 00 00 00 00 00 00 |........|........|
|00000700| ff 54 54 00 2a 2a 2a 2a | 2a 2a 2a 54 7f 11 11 00 |.TT.****|***T....|
|00000710| 0b 0b 0b 0b 0b 0b 0b 11 | 17 ff 00 00 00 00 00 00 |........|........|
|00000720| ff 54 54 54 54 00 2a 2a | 2a 54 7f 7f 7f 7f 11 11 |.TTTT.**|*T......|
|00000730| 11 00 0b 0b 0b 11 17 17 | 17 ff 00 00 00 00 00 00 |........|........|
|00000740| ff 54 54 54 54 54 54 00 | 7f 7f 7f 7f 7f 11 11 11 |.TTTTTT.|........|
|00000750| 11 11 11 00 17 17 17 17 | 17 ff 00 00 00 00 00 ff |........|........|
|00000760| ff 54 54 54 54 54 54 7f | 7f 7f 7f 7f 7f 7f 11 11 |.TTTTTT.|........|
|00000770| 11 11 11 17 17 17 17 17 | 17 ff ff 00 00 00 ff 00 |........|........|
|00000780| ff 54 54 54 54 54 54 54 | 7f 7f 7f 7f 7f 11 11 11 |.TTTTTTT|........|
|00000790| 11 11 11 11 17 17 17 17 | 17 ff f9 ff 00 ff 00 f7 |........|........|
|000007a0| ff 54 54 54 54 54 54 7f | 7f 7f 7f 7f 7f 7f 11 11 |.TTTTTT.|........|
|000007b0| 11 11 11 17 17 17 17 17 | 17 ff f7 f9 ff ff f7 f7 |........|........|
|000007c0| ff 54 54 54 54 54 54 54 | 7f 7f 7f 7f 7f 11 11 11 |.TTTTTTT|........|
|000007d0| 11 11 11 11 17 17 17 17 | 17 ff f7 f7 ff ff f7 00 |........|........|
|000007e0| ff ff 54 54 54 54 54 7f | 7f 7f 7f 7f ff ff 11 11 |..TTTTT.|........|
|000007f0| 11 11 11 17 17 17 17 17 | ff ff f7 f9 ff ff f7 f7 |........|........|
|00000800| f7 00 ff ff 54 54 54 54 | 7f 7f ff ff f9 f9 ff ff |....TTTT|........|
|00000810| 11 11 11 11 17 17 ff ff | f7 f9 f9 f9 ff 00 ff ff |........|........|
|00000820| f7 f7 f7 00 ff ff 54 7f | ff ff f9 f9 f9 f9 f7 f6 |......T.|........|
|00000830| ff ff 11 17 ff ff f7 f9 | f9 f9 ff ff 00 00 00 00 |........|........|
|00000840| ff ff f7 f7 f7 00 ff ff | f9 f9 f9 f7 f6 f6 f6 f6 |........|........|
|00000850| f6 f6 ff ff f7 f9 f9 f9 | ff ff 00 00 00 00 00 00 |........|........|
|00000860| 00 00 ff ff f7 f7 f7 00 | 00 f6 f6 f6 f6 f6 f6 f6 |........|........|
|00000870| f6 f7 f7 f9 f9 f9 ff ff | 00 00 00 00 00 00 00 00 |........|........|
|00000880| 00 00 00 00 ff ff f7 f7 | f7 00 00 f6 f6 f6 f6 f7 |........|........|
|00000890| f7 f9 f9 f9 ff ff 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008a0| 00 00 00 00 00 00 ff ff | f7 f7 f7 00 00 f7 f7 f9 |........|........|
|000008b0| f9 f9 ff ff 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008c0| 00 00 00 00 00 00 00 00 | ff ff f7 f7 f7 f9 f9 f9 |........|........|
|000008d0| ff ff 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000008e0| 00 00 00 00 00 00 00 00 | 00 00 ff ff f7 f9 ff ff |........|........|
|000008f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000900| 00 00 00 00 00 00 00 00 | 00 00 00 00 ff ff 00 00 |........|........|
|00000910| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 01 04 74 |........|.......t|
|00000920| 65 78 74 04 3f 3f 3f 3f | 04 54 45 58 54 00 00 01 |ext.????|.TEXT...|
|00000930| 0f 04 56 69 65 77 0b 44 | 6f 63 74 6f 72 73 4c 69 |..View.D|octorsLi|
|00000940| 73 74 04 bb 01 8c 01 12 | 04 4e 61 6d 65 0b 44 6f |st......|.Name.Do|
|00000950| 63 74 6f 72 73 4c 69 73 | 74 05 46 72 61 6d 65 01 |ctorsLis|t.Frame.|
|00000960| 30 0c 48 61 73 42 61 63 | 6b 43 6f 6c 6f 72 05 46 |0.HasBac|kColor.F|
|00000970| 61 6c 73 65 09 42 61 63 | 6b 43 6f 6c 6f 72 08 31 |alse.Bac|kColor.1|
|00000980| 36 37 37 37 32 31 35 08 | 42 61 63 6b 64 72 6f 70 |6777215.|Backdrop|
|00000990| 01 30 05 54 69 74 6c 65 | 0c 44 6f 63 74 6f 72 73 |.0.Title|.Doctors|
|000009a0| 20 4c 69 73 74 07 56 69 | 73 69 62 6c 65 04 54 72 | List.Vi|sible.Tr|
|000009b0| 75 65 08 43 6c 6f 73 65 | 42 6f 78 04 54 72 75 65 |ue.Close|Box.True|
|000009c0| 08 47 72 6f 77 49 63 6f | 6e 04 54 72 75 65 08 5a |.GrowIco|n.True.Z|
|000009d0| 6f 6f 6d 49 63 6f 6e 05 | 46 61 6c 73 65 0b 42 61 |oomIcon.|False.Ba|
|000009e0| 6c 6c 6f 6f 6e 48 65 6c | 70 00 09 50 6c 61 63 65 |lloonHel|p..Place|
|000009f0| 6d 65 6e 74 01 30 05 57 | 69 64 74 68 03 33 38 37 |ment.0.W|idth.387|
|00000a00| 06 48 65 69 67 68 74 03 | 33 34 30 08 4d 69 6e 57 |.Height.|340.MinW|
|00000a10| 69 64 74 68 02 36 34 09 | 4d 69 6e 48 65 69 67 68 |idth.64.|MinHeigh|
|00000a20| 74 02 36 34 08 4d 61 78 | 57 69 64 74 68 05 33 32 |t.64.Max|Width.32|
|00000a30| 30 30 30 09 4d 61 78 48 | 65 69 67 68 74 05 33 32 |000.MaxH|eight.32|
|00000a40| 30 30 30 07 00 0b 44 6f | 63 74 6f 72 73 4c 69 73 |000...Do|ctorsLis|
|00000a50| 74 b4 01 06 44 69 61 6c | 6f 67 00 02 1b 73 65 6c |t...Dial|og...sel|
|00000a60| 65 63 74 69 6f 6e 20 61 | 73 20 64 61 74 61 62 61 |ection a|s databa|
|00000a70| 73 65 63 75 72 73 6f 72 | 00 0e 64 62 20 61 73 20 |secursor|..db as |
|00000a80| 64 61 74 61 62 61 73 65 | 00 02 09 4d 6f 64 69 66 |database|...Modif|
|00000a90| 79 52 6f 77 0e 52 6f 77 | 20 61 73 20 49 6e 74 65 |yRow.Row| as Inte|
|00000aa0| 67 65 72 00 00 09 26 09 | 26 0b 1d 53 75 62 20 4d |ger...&.|&..Sub M|
|00000ab0| 6f 64 69 66 79 52 6f 77 | 28 52 6f 77 20 61 73 20 |odifyRow|(Row as |
|00000ac0| 49 6e 74 65 67 65 72 29 | 14 64 69 6d 20 77 20 61 |Integer)|.dim w a|
|00000ad0| 73 20 44 6f 63 74 6f 72 | 45 6e 74 72 79 19 64 69 |s Doctor|Entry.di|
|00000ae0| 6d 20 64 62 63 20 61 73 | 20 64 61 74 61 62 61 73 |m dbc as| databas|
|00000af0| 65 63 75 72 73 6f 72 00 | 13 77 20 3d 20 6e 65 77 |ecursor.|.w = new|
|00000b00| 20 44 6f 63 74 6f 72 45 | 6e 74 72 79 06 77 2e 73 | DoctorE|ntry.w.s|
|00000b10| 68 6f 77 b8 01 77 2e 73 | 65 6c 65 63 74 69 6f 6e |how..w.s|election|
|00000b20| 20 3d 20 64 6f 63 74 6f | 72 73 71 75 65 72 79 2e | = docto|rsquery.|
|00000b30| 64 61 74 61 62 61 73 65 | 2e 73 71 6c 53 65 6c 65 |database|.sqlSele|
|00000b40| 63 74 28 22 53 65 6c 65 | 63 74 20 2a 20 66 72 6f |ct("Sele|ct * fro|
|00000b50| 6d 20 44 6f 63 74 6f 72 | 73 20 77 68 65 72 65 20 |m Doctor|s where |
|00000b60| 49 44 3d 22 2b 4c 69 73 | 74 62 6f 78 31 2e 63 65 |ID="+Lis|tbox1.ce|
|00000b70| 6c 6c 28 72 6f 77 2c 4c | 69 73 74 62 6f 78 31 2e |ll(row,L|istbox1.|
|00000b80| 63 6f 6c 75 6d 6e 63 6f | 75 6e 74 29 29 09 77 2e |columnco|unt)).w.|
|00000b90| 64 62 20 3d 20 64 62 1c | 47 65 74 43 75 72 72 65 |db = db.|GetCurre|
|00000ba0| 6e 74 52 6f 77 20 77 2e | 73 65 6c 65 63 74 69 6f |ntRow w.|selectio|
|00000bb0| 6e 2c 20 77 26 77 2e 74 | 69 74 6c 65 20 3d 20 77 |n, w&w.t|itle = w|
|00000bc0| 2e 66 69 72 73 74 2e 74 | 65 78 74 2b 22 20 22 2b |.first.t|ext+" "+|
|00000bd0| 77 2e 6c 61 73 74 2e 74 | 65 78 74 07 45 6e 64 20 |w.last.t|ext.End |
|00000be0| 53 75 62 0a 55 70 64 61 | 74 65 4c 69 73 74 00 00 |Sub.Upda|teList..|
|00000bf0| 00 02 3e 02 3e 04 10 53 | 75 62 20 55 70 64 61 74 |..>.>..S|ub Updat|
|00000c00| 65 4c 69 73 74 28 29 21 | 64 6f 63 74 6f 72 73 4c |eList()!|doctorsL|
|00000c10| 69 73 74 2e 64 6f 63 74 | 6f 72 73 51 75 65 72 79 |ist.doct|orsQuery|
|00000c20| 2e 72 75 6e 51 75 65 72 | 79 3e 64 6f 63 74 6f 72 |.runQuer|y>doctor|
|00000c30| 73 4c 69 73 74 2e 72 6f | 77 73 46 6f 75 6e 64 2e |sList.ro|wsFound.|
|00000c40| 74 65 78 74 3d 73 74 72 | 28 64 6f 63 74 6f 72 73 |text=str|(doctors|
|00000c50| 4c 69 73 74 2e 6c 69 73 | 74 42 6f 78 31 2e 6c 69 |List.lis|tBox1.li|
|00000c60| 73 74 63 6f 75 6e 74 29 | 07 45 6e 64 20 53 75 62 |stcount)|.End Sub|
|00000c70| 00 05 07 52 65 73 69 7a | 65 64 01 00 01 00 03 0d |...Resiz|ed......|
|00000c80| 53 75 62 20 52 65 73 69 | 7a 65 64 28 29 00 07 45 |Sub Resi|zed()..E|
|00000c90| 6e 64 20 53 75 62 0b 43 | 61 6e 63 65 6c 43 6c 6f |nd Sub.C|ancelClo|
|00000ca0| 73 65 01 00 01 00 03 21 | 46 75 6e 63 74 69 6f 6e |se.....!|Function|
|00000cb0| 20 43 61 6e 63 65 6c 43 | 6c 6f 73 65 28 29 20 41 | CancelC|lose() A|
|00000cc0| 73 20 42 6f 6f 6c 65 61 | 6e 00 0c 45 6e 64 20 46 |s Boolea|n..End F|
|00000cd0| 75 6e 63 74 69 6f 6e 05 | 43 6c 6f 73 65 01 00 01 |unction.|Close...|
|00000ce0| 00 03 0b 53 75 62 20 43 | 6c 6f 73 65 28 29 00 07 |...Sub C|lose()..|
|00000cf0| 45 6e 64 20 53 75 62 0f | 45 6e 61 62 6c 65 4d 65 |End Sub.|EnableMe|
|00000d00| 6e 75 49 74 65 6d 73 01 | 16 01 16 08 15 53 75 62 |nuItems.|.....Sub|
|00000d10| 20 45 6e 61 62 6c 65 4d | 65 6e 75 49 74 65 6d 73 | EnableM|enuItems|
|00000d20| 28 29 16 46 69 6c 65 43 | 6c 6f 73 65 2e 65 6e 61 |().FileC|lose.ena|
|00000d30| 62 6c 65 64 3d 74 72 75 | 65 18 44 6f 63 74 6f 72 |bled=tru|e.Doctor|
|00000d40| 73 46 69 6e 64 2e 65 6e | 61 62 6c 65 64 3d 74 72 |sFind.en|abled=tr|
|00000d50| 75 65 1a 44 6f 63 74 6f | 72 73 49 6d 70 6f 72 74 |ue.Docto|rsImport|
|00000d60| 2e 65 6e 61 62 6c 65 64 | 3d 74 72 75 65 1d 69 66 |.enabled|=true.if|
|00000d70| 20 6c 69 73 74 42 6f 78 | 31 2e 73 65 6c 63 6f 75 | listBox|1.selcou|
|00000d80| 6e 74 20 3e 20 30 20 74 | 68 65 6e 1a 44 6f 63 74 |nt > 0 t|hen.Doct|
|00000d90| 6f 72 73 4d 6f 64 69 66 | 79 2e 65 6e 61 62 6c 65 |orsModif|y.enable|
|00000da0| 64 3d 74 72 75 65 06 65 | 6e 64 20 69 66 07 45 6e |d=true.e|nd if.En|
|00000db0| 64 20 53 75 62 04 4f 70 | 65 6e 01 18 01 18 03 0a |d Sub.Op|en......|
|00000dc0| 53 75 62 20 4f 70 65 6e | 28 29 18 64 6f 63 74 6f |Sub Open|().docto|
|00000dd0| 72 73 71 75 65 72 79 2e | 64 61 74 61 62 61 73 65 |rsquery.|database|
|00000de0| 3d 64 62 07 45 6e 64 20 | 53 75 62 04 0d 44 6f 63 |=db.End |Sub..Doc|
|00000df0| 74 6f 72 73 49 6d 70 6f | 72 74 1b 06 1b 06 20 1a |torsImpo|rt.... .|
|00000e00| 46 75 6e 63 74 69 6f 6e | 20 41 63 74 69 6f 6e 20 |Function| Action |
|00000e10| 41 73 20 42 6f 6f 6c 65 | 61 6e 13 64 69 6d 20 66 |As Boole|an.dim f|
|00000e20| 20 61 73 20 66 6f 6c 64 | 65 72 49 74 65 6d 19 64 | as fold|erItem.d|
|00000e30| 69 6d 20 74 69 20 61 73 | 20 74 65 78 74 69 6e 70 |im ti as| textinp|
|00000e40| 75 74 53 74 72 65 61 6d | 19 64 69 6d 20 72 65 63 |utStream|.dim rec|
|00000e50| 20 61 73 20 44 61 74 61 | 62 61 73 65 52 65 63 6f | as Data|baseReco|
|00000e60| 72 64 11 64 69 6d 20 72 | 6f 77 20 61 73 20 73 74 |rd.dim r|ow as st|
|00000e70| 72 69 6e 67 00 13 49 6d | 70 6f 72 74 50 72 6f 67 |ring..Im|portProg|
|00000e80| 72 65 73 73 2e 53 68 6f | 77 16 49 6d 70 6f 72 74 |ress.Sho|w.Import|
|00000e90| 50 72 6f 67 72 65 73 73 | 2e 72 65 66 72 65 73 68 |Progress|.refresh|
|00000ea0| 00 10 2f 2f 69 6d 70 6f | 72 74 20 64 6f 63 74 6f |..//impo|rt docto|
|00000eb0| 72 73 1e 66 3d 67 65 74 | 46 6f 6c 64 65 72 49 74 |rs.f=get|FolderIt|
|00000ec0| 65 6d 28 22 44 6f 63 74 | 6f 72 73 2e 74 78 74 22 |em("Doct|ors.txt"|
|00000ed0| 29 10 69 66 20 66 20 3c | 3e 20 6e 69 6c 20 74 68 |).if f <|> nil th|
|00000ee0| 65 6e 13 74 69 3d 66 2e | 6f 70 65 6e 61 73 74 65 |en.ti=f.|openaste|
|00000ef0| 78 74 46 69 6c 65 18 72 | 65 63 20 3d 20 6e 65 77 |xtFile.r|ec = new|
|00000f00| 20 44 61 74 61 62 61 73 | 65 52 65 63 6f 72 64 03 | Databas|eRecord.|
|00000f10| 64 6f 20 11 72 6f 77 20 | 3d 20 74 69 2e 72 65 61 |do .row |= ti.rea|
|00000f20| 64 6c 69 6e 65 27 72 65 | 63 2e 63 6f 6c 75 6d 6e |dline're|c.column|
|00000f30| 28 22 49 44 22 29 3d 6e | 74 68 46 69 65 6c 64 28 |("ID")=n|thField(|
|00000f40| 72 6f 77 2c 63 68 72 28 | 39 29 2c 31 29 2a 72 65 |row,chr(|9),1)*re|
|00000f50| 63 2e 63 6f 6c 75 6d 6e | 28 22 46 69 72 73 74 22 |c.column|("First"|
|00000f60| 29 3d 6e 74 68 46 69 65 | 6c 64 28 72 6f 77 2c 63 |)=nthFie|ld(row,c|
|00000f70| 68 72 28 39 29 2c 32 29 | 29 72 65 63 2e 63 6f 6c |hr(9),2)|)rec.col|
|00000f80| 75 6d 6e 28 22 4c 61 73 | 74 22 29 3d 6e 74 68 46 |umn("Las|t")=nthF|
|00000f90| 69 65 6c 64 28 72 6f 77 | 2c 63 68 72 28 39 29 2c |ield(row|,chr(9),|
|00000fa0| 33 29 2e 72 65 63 2e 63 | 6f 6c 75 6d 6e 28 22 53 |3).rec.c|olumn("S|
|00000fb0| 70 65 63 69 61 6c 74 79 | 22 29 3d 6e 74 68 46 69 |pecialty|")=nthFi|
|00000fc0| 65 6c 64 28 72 6f 77 2c | 63 68 72 28 39 29 2c 34 |eld(row,|chr(9),4|
|00000fd0| 29 2c 72 65 63 2e 63 6f | 6c 75 6d 6e 28 22 41 64 |),rec.co|lumn("Ad|
|00000fe0| 64 72 65 73 73 22 29 3d | 6e 74 68 46 69 65 6c 64 |dress")=|nthField|
|00000ff0| 28 72 6f 77 2c 63 68 72 | 28 39 29 2c 35 29 29 72 |(row,chr|(9),5))r|
|00001000| 65 63 2e 63 6f 6c 75 6d | 6e 28 22 43 69 74 79 22 |ec.colum|n("City"|
|00001010| 29 3d 6e 74 68 46 69 65 | 6c 64 28 72 6f 77 2c 63 |)=nthFie|ld(row,c|
|00001020| 68 72 28 39 29 2c 36 29 | 2a 72 65 63 2e 63 6f 6c |hr(9),6)|*rec.col|
|00001030| 75 6d 6e 28 22 53 74 61 | 74 65 22 29 3d 6e 74 68 |umn("Sta|te")=nth|
|00001040| 46 69 65 6c 64 28 72 6f | 77 2c 63 68 72 28 39 29 |Field(ro|w,chr(9)|
|00001050| 2c 37 29 28 72 65 63 2e | 63 6f 6c 75 6d 6e 28 22 |,7)(rec.|column("|
|00001060| 5a 69 70 22 29 3d 6e 74 | 68 46 69 65 6c 64 28 72 |Zip")=nt|hField(r|
|00001070| 6f 77 2c 63 68 72 28 39 | 29 2c 38 29 1d 64 62 2e |ow,chr(9|),8).db.|
|00001080| 49 6e 73 65 72 74 52 65 | 63 6f 72 64 20 22 44 6f |InsertRe|cord "Do|
|00001090| 63 74 6f 72 73 22 2c 72 | 65 63 11 6c 6f 6f 70 20 |ctors",r|ec.loop |
|000010a0| 75 6e 74 69 6c 20 74 69 | 2e 65 6f 66 08 74 69 2e |until ti|.eof.ti.|
|000010b0| 63 6c 6f 73 65 06 65 6e | 64 20 69 66 00 09 64 62 |close.en|d if..db|
|000010c0| 2e 43 6f 6d 6d 69 74 14 | 49 6d 70 6f 72 74 50 72 |.Commit.|ImportPr|
|000010d0| 6f 67 72 65 73 73 2e 43 | 6c 6f 73 65 0c 45 6e 64 |ogress.C|lose.End|
|000010e0| 20 46 75 6e 63 74 69 6f | 6e 0b 44 6f 63 74 6f 72 | Functio|n.Doctor|
|000010f0| 73 46 69 6e 64 01 09 01 | 09 03 1a 46 75 6e 63 74 |sFind...|...Funct|
|00001100| 69 6f 6e 20 41 63 74 69 | 6f 6e 20 41 73 20 42 6f |ion Acti|on As Bo|
|00001110| 6f 6c 65 61 6e 09 46 69 | 6e 64 2e 53 68 6f 77 0c |olean.Fi|nd.Show.|
|00001120| 45 6e 64 20 46 75 6e 63 | 74 69 6f 6e 0d 44 6f 63 |End Func|tion.Doc|
|00001130| 74 6f 72 73 4d 6f 64 69 | 66 79 01 0c 01 0c 08 1a |torsModi|fy......|
|00001140| 46 75 6e 63 74 69 6f 6e | 20 41 63 74 69 6f 6e 20 |Function| Action |
|00001150| 41 73 20 42 6f 6f 6c 65 | 61 6e 10 64 69 6d 20 69 |As Boole|an.dim i|
|00001160| 20 61 73 20 69 6e 74 65 | 67 65 72 1f 66 6f 72 20 | as inte|ger.for |
|00001170| 69 3d 30 20 74 6f 20 6c | 69 73 74 62 6f 78 31 2e |i=0 to l|istbox1.|
|00001180| 6c 69 73 74 63 6f 75 6e | 74 2d 31 1c 69 66 20 6c |listcoun|t-1.if l|
|00001190| 69 73 74 42 6f 78 31 2e | 73 65 6c 65 63 74 65 64 |istBox1.|selected|
|000011a0| 28 69 29 20 74 68 65 6e | 0b 6d 6f 64 69 66 79 52 |(i) then|.modifyR|
|000011b0| 6f 77 20 69 06 65 6e 64 | 20 69 66 04 6e 65 78 74 |ow i.end| if.next|
|000011c0| 0c 45 6e 64 20 46 75 6e | 63 74 69 6f 6e 09 46 69 |.End Fun|ction.Fi|
|000011d0| 6c 65 43 6c 6f 73 65 01 | 05 01 05 03 1a 46 75 6e |leClose.|.....Fun|
|000011e0| 63 74 69 6f 6e 20 41 63 | 74 69 6f 6e 20 41 73 20 |ction Ac|tion As |
|000011f0| 42 6f 6f 6c 65 61 6e 05 | 63 6c 6f 73 65 0c 45 6e |Boolean.|close.En|
|00001200| 64 20 46 75 6e 63 74 69 | 6f 6e 00 04 07 00 00 8c |d Functi|on......|
|00001210| 05 07 4c 69 73 74 62 6f | 78 00 00 00 00 03 0b 44 |..Listbo|x......D|
|00001220| 6f 75 62 6c 65 43 6c 69 | 63 6b 01 16 01 16 03 11 |oubleCli|ck......|
|00001230| 53 75 62 20 44 6f 75 62 | 6c 65 43 6c 69 63 6b 28 |Sub Doub|leClick(|
|00001240| 29 16 6d 6f 64 69 66 79 | 52 6f 77 20 6d 65 2e 6c |).modify|Row me.l|
|00001250| 69 73 74 69 6e 64 65 78 | 07 45 6e 64 20 53 75 62 |istindex|.End Sub|
|00001260| 04 4f 70 65 6e 04 14 04 | 14 06 0a 53 75 62 20 4f |.Open...|...Sub O|
|00001270| 70 65 6e 28 29 15 6d 65 | 2e 68 65 61 64 69 6e 67 |pen().me|.heading|
|00001280| 28 30 29 3d 22 46 69 72 | 73 74 22 14 6d 65 2e 68 |(0)="Fir|st".me.h|
|00001290| 65 61 64 69 6e 67 28 31 | 29 3d 22 4c 61 73 74 22 |eading(1|)="Last"|
|000012a0| 19 6d 65 2e 68 65 61 64 | 69 6e 67 28 32 29 3d 22 |.me.head|ing(2)="|
|000012b0| 53 70 65 63 69 61 6c 74 | 79 22 14 6d 65 2e 68 65 |Specialt|y".me.he|
|000012c0| 61 64 69 6e 67 28 33 29 | 3d 22 43 69 74 79 22 07 |ading(3)|="City".|
|000012d0| 45 6e 64 20 53 75 62 06 | 43 68 61 6e 67 65 01 00 |End Sub.|Change..|
|000012e0| 01 00 03 0c 53 75 62 20 | 43 68 61 6e 67 65 28 29 |....Sub |Change()|
|000012f0| 00 07 45 6e 64 20 53 75 | 62 00 00 07 00 00 30 0d |..End Su|b.....0.|
|00001300| 44 61 74 61 62 61 73 65 | 51 75 65 72 79 00 00 00 |Database|Query...|
|00001310| 00 00 00 00 07 00 00 b4 | 01 0a 53 74 61 74 69 63 |........|..Static|
|00001320| 54 65 78 74 00 00 00 00 | 00 00 00 07 00 00 b4 01 |Text....|........|
|00001330| 0a 53 74 61 74 69 63 54 | 65 78 74 00 00 00 00 01 |.StaticT|ext.....|
|00001340| 09 4d 6f 75 73 65 4d 6f | 76 65 01 00 01 00 03 29 |.MouseMo|ve.....)|
|00001350| 53 75 62 20 4d 6f 75 73 | 65 4d 6f 76 65 28 58 20 |Sub Mous|eMove(X |
|00001360| 41 73 20 49 6e 74 65 67 | 65 72 2c 20 59 20 41 73 |As Integ|er, Y As|
|00001370| 20 49 6e 74 65 67 65 72 | 29 00 07 45 6e 64 20 53 | Integer|)..End S|
|00001380| 75 62 00 00 04 07 4c 69 | 73 74 42 6f 78 1c 04 4e |ub....Li|stBox..N|
|00001390| 61 6d 65 08 4c 69 73 74 | 42 6f 78 31 05 49 6e 64 |ame.List|Box1.Ind|
|000013a0| 65 78 0b 2d 32 31 34 37 | 34 38 33 36 34 38 0d 54 |ex.-2147|483648.T|
|000013b0| 61 62 50 61 6e 65 6c 49 | 6e 64 65 78 01 30 07 56 |abPanelI|ndex.0.V|
|000013c0| 69 73 69 62 6c 65 04 54 | 72 75 65 04 4c 65 66 74 |isible.T|rue.Left|
|000013d0| 02 2d 31 03 54 6f 70 02 | 2d 31 05 57 69 64 74 68 |.-1.Top.|-1.Width|
|000013e0| 03 33 38 39 06 48 65 69 | 67 68 74 03 33 32 37 0b |.389.Hei|ght.327.|
|000013f0| 42 61 6c 6c 6f 6f 6e 48 | 65 6c 70 00 13 44 69 73 |BalloonH|elp..Dis|
|00001400| 61 62 6c 65 64 42 61 6c | 6c 6f 6f 6e 48 65 6c 70 |abledBal|loonHelp|
|00001410| 00 08 4c 6f 63 6b 4c 65 | 66 74 04 54 72 75 65 07 |..LockLe|ft.True.|
|00001420| 4c 6f 63 6b 54 6f 70 04 | 54 72 75 65 09 4c 6f 63 |LockTop.|True.Loc|
|00001430| 6b 52 69 67 68 74 04 54 | 72 75 65 0a 4c 6f 63 6b |kRight.T|rue.Lock|
|00001440| 42 6f 74 74 6f 6d 04 54 | 72 75 65 08 54 65 78 74 |Bottom.T|rue.Text|
|00001450| 46 6f 6e 74 08 43 68 61 | 72 63 6f 61 6c 08 54 65 |Font.Cha|rcoal.Te|
|00001460| 78 74 53 69 7a 65 02 31 | 32 04 42 6f 6c 64 05 46 |xtSize.1|2.Bold.F|
|00001470| 61 6c 73 65 06 49 74 61 | 6c 69 63 05 46 61 6c 73 |alse.Ita|lic.Fals|
|00001480| 65 09 55 6e 64 65 72 6c | 69 6e 65 05 46 61 6c 73 |e.Underl|ine.Fals|
|00001490| 65 07 45 6e 61 62 6c 65 | 64 04 54 72 75 65 0b 43 |e.Enable|d.True.C|
|000014a0| 6f 6c 75 6d 6e 43 6f 75 | 6e 74 01 34 0c 43 6f 6c |olumnCou|nt.4.Col|
|000014b0| 75 6d 6e 57 69 64 74 68 | 73 00 0a 48 61 73 48 65 |umnWidth|s..HasHe|
|000014c0| 61 64 69 6e 67 04 54 72 | 75 65 0c 55 73 65 46 6f |ading.Tr|ue.UseFo|
|000014d0| 63 75 73 52 69 6e 67 04 | 54 72 75 65 0c 49 6e 69 |cusRing.|True.Ini|
|000014e0| 74 69 61 6c 56 61 6c 75 | 65 00 0c 48 69 65 72 61 |tialValu|e..Hiera|
|000014f0| 72 63 68 69 63 61 6c 05 | 46 61 6c 73 65 0a 45 6e |rchical.|False.En|
|00001500| 61 62 6c 65 44 72 61 67 | 05 46 61 6c 73 65 0d 53 |ableDrag|.False.S|
|00001510| 65 6c 65 63 74 69 6f 6e | 54 79 70 65 01 31 00 0d |election|Type.1..|
|00001520| 44 61 74 61 62 61 73 65 | 51 75 65 72 79 06 04 4e |Database|Query..N|
|00001530| 61 6d 65 0c 64 6f 63 74 | 6f 72 73 51 75 65 72 79 |ame.doct|orsQuery|
|00001540| 05 49 6e 64 65 78 0b 2d | 32 31 34 37 34 38 33 36 |.Index.-|21474836|
|00001550| 34 38 04 4c 65 66 74 03 | 33 33 30 03 54 6f 70 03 |48.Left.|330.Top.|
|00001560| 33 31 37 08 53 51 4c 51 | 75 65 72 79 00 08 44 61 |317.SQLQ|uery..Da|
|00001570| 74 61 62 61 73 65 01 30 | 01 0a 53 74 61 74 69 63 |tabase.0|..Static|
|00001580| 54 65 78 74 17 04 4e 61 | 6d 65 0b 53 74 61 74 69 |Text..Na|me.Stati|
|00001590| 63 54 65 78 74 31 05 49 | 6e 64 65 78 0b 2d 32 31 |cText1.I|ndex.-21|
|000015a0| 34 37 34 38 33 36 34 38 | 0d 54 61 62 50 61 6e 65 |47483648|.TabPane|
|000015b0| 6c 49 6e 64 65 78 01 30 | 07 56 69 73 69 62 6c 65 |lIndex.0|.Visible|
|000015c0| 04 54 72 75 65 04 4c 65 | 66 74 01 34 03 54 6f 70 |.True.Le|ft.4.Top|
|000015d0| 03 33 32 37 05 57 69 64 | 74 68 02 37 36 06 48 65 |.327.Wid|th.76.He|
|000015e0| 69 67 68 74 02 31 32 0b | 42 61 6c 6c 6f 6f 6e 48 |ight.12.|BalloonH|
|000015f0| 65 6c 70 00 13 44 69 73 | 61 62 6c 65 64 42 61 6c |elp..Dis|abledBal|
|00001600| 6c 6f 6f 6e 48 65 6c 70 | 00 08 4c 6f 63 6b 4c 65 |loonHelp|..LockLe|
|00001610| 66 74 04 54 72 75 65 07 | 4c 6f 63 6b 54 6f 70 05 |ft.True.|LockTop.|
|00001620| 46 61 6c 73 65 09 4c 6f | 63 6b 52 69 67 68 74 05 |False.Lo|ckRight.|
|00001630| 46 61 6c 73 65 0a 4c 6f | 63 6b 42 6f 74 74 6f 6d |False.Lo|ckBottom|
|00001640| 04 54 72 75 65 08 54 65 | 78 74 46 6f 6e 74 06 47 |.True.Te|xtFont.G|
|00001650| 65 6e 65 76 61 08 54 65 | 78 74 53 69 7a 65 01 39 |eneva.Te|xtSize.9|
|00001660| 04 42 6f 6c 64 05 46 61 | 6c 73 65 06 49 74 61 6c |.Bold.Fa|lse.Ital|
|00001670| 69 63 05 46 61 6c 73 65 | 09 55 6e 64 65 72 6c 69 |ic.False|.Underli|
|00001680| 6e 65 05 46 61 6c 73 65 | 04 54 65 78 74 0f 52 6f |ne.False|.Text.Ro|
|00001690| 77 73 20 64 69 73 70 6c | 61 79 65 64 3a 09 54 65 |ws displ|ayed:.Te|
|000016a0| 78 74 41 6c 69 67 6e 01 | 30 09 54 65 78 74 43 6f |xtAlign.|0.TextCo|
|000016b0| 6c 6f 72 01 30 09 4d 75 | 6c 74 69 4c 69 6e 65 05 |lor.0.Mu|ltiLine.|
|000016c0| 46 61 6c 73 65 02 0a 53 | 74 61 74 69 63 54 65 78 |False..S|taticTex|
|000016d0| 74 17 04 4e 61 6d 65 09 | 52 6f 77 73 46 6f 75 6e |t..Name.|RowsFoun|
|000016e0| 64 05 49 6e 64 65 78 0b | 2d 32 31 34 37 34 38 33 |d.Index.|-2147483|
|000016f0| 36 34 38 0d 54 61 62 50 | 61 6e 65 6c 49 6e 64 65 |648.TabP|anelInde|
|00001700| 78 01 30 07 56 69 73 69 | 62 6c 65 04 54 72 75 65 |x.0.Visi|ble.True|
|00001710| 04 4c 65 66 74 02 38 30 | 03 54 6f 70 03 33 32 37 |.Left.80|.Top.327|
|00001720| 05 57 69 64 74 68 02 36 | 30 06 48 65 69 67 68 74 |.Width.6|0.Height|
|00001730| 02 31 32 0b 42 61 6c 6c | 6f 6f 6e 48 65 6c 70 00 |.12.Ball|oonHelp.|
|00001740| 13 44 69 73 61 62 6c 65 | 64 42 61 6c 6c 6f 6f 6e |.Disable|dBalloon|
|00001750| 48 65 6c 70 00 08 4c 6f | 63 6b 4c 65 66 74 04 54 |Help..Lo|ckLeft.T|
|00001760| 72 75 65 07 4c 6f 63 6b | 54 6f 70 05 46 61 6c 73 |rue.Lock|Top.Fals|
|00001770| 65 09 4c 6f 63 6b 52 69 | 67 68 74 05 46 61 6c 73 |e.LockRi|ght.Fals|
|00001780| 65 0a 4c 6f 63 6b 42 6f | 74 74 6f 6d 04 54 72 75 |e.LockBo|ttom.Tru|
|00001790| 65 08 54 65 78 74 46 6f | 6e 74 06 47 65 6e 65 76 |e.TextFo|nt.Genev|
|000017a0| 61 08 54 65 78 74 53 69 | 7a 65 01 39 04 42 6f 6c |a.TextSi|ze.9.Bol|
|000017b0| 64 05 46 61 6c 73 65 06 | 49 74 61 6c 69 63 05 46 |d.False.|Italic.F|
|000017c0| 61 6c 73 65 09 55 6e 64 | 65 72 6c 69 6e 65 05 46 |alse.Und|erline.F|
|000017d0| 61 6c 73 65 04 54 65 78 | 74 01 30 09 54 65 78 74 |alse.Tex|t.0.Text|
|000017e0| 41 6c 69 67 6e 01 30 09 | 54 65 78 74 43 6f 6c 6f |Align.0.|TextColo|
|000017f0| 72 01 30 09 4d 75 6c 74 | 69 4c 69 6e 65 05 46 61 |r.0.Mult|iLine.Fa|
|00001800| 6c 73 65 03 02 00 29 42 | 69 6e 64 20 4c 69 73 74 |lse...)B|ind List|
|00001810| 42 6f 78 31 20 77 69 74 | 68 20 44 61 74 61 62 61 |Box1 wit|h Databa|
|00001820| 73 65 51 75 65 72 79 31 | 20 72 65 73 75 6c 74 73 |seQuery1| results|
|00001830| 01 00 00 00 0a 6c 69 73 | 74 42 69 6e 64 65 72 00 |.....lis|tBinder.|
|00001840| 00 00 27 42 69 6e 64 20 | 4c 69 73 74 42 6f 78 31 |..'Bind |ListBox1|
|00001850| 20 77 69 74 68 20 64 6f | 63 74 6f 72 73 51 75 65 | with do|ctorsQue|
|00001860| 72 79 20 72 65 73 75 6c | 74 73 01 00 00 00 0a 6c |ry resul|ts.....l|
|00001870| 69 73 74 42 69 6e 64 65 | 72 00 00 02 41 04 4d 65 |istBinde|r...A.Me|
|00001880| 6e 75 04 4d 65 6e 75 05 | 80 03 ac 01 ac 07 b4 04 |nu.Menu.|........|
|00001890| 05 01 00 00 80 80 80 80 | 10 00 00 00 00 00 07 00 |........|........|
|000018a0| 00 88 01 08 4d 65 6e 75 | 49 74 65 6d 00 00 00 00 |....Menu|Item....|
|000018b0| 00 00 00 01 02 00 00 80 | 80 80 80 10 00 00 00 00 |........|........|
|000018c0| 00 07 00 00 88 01 08 4d | 65 6e 75 49 74 65 6d 00 |.......M|enuItem.|
|000018d0| 00 00 00 00 00 00 00 00 | 04 46 69 6c 65 00 80 80 |........|.File...|
|000018e0| 80 80 10 00 00 00 00 00 | 07 00 00 88 01 08 4d 65 |........|......Me|
|000018f0| 6e 75 49 74 65 6d 00 00 | 00 00 00 00 00 07 00 17 |nuItem..|........|
|00001900| 4e 65 77 20 44 6f 63 74 | 6f 72 73 20 44 61 74 61 |New Doct|ors Data|
|00001910| 62 61 73 65 2e 2e 2e 16 | 46 69 6c 65 4e 65 77 44 |base....|FileNewD|
|00001920| 6f 63 74 6f 72 73 44 61 | 74 61 62 61 73 65 80 80 |octorsDa|tabase..|
|00001930| 80 80 10 00 00 00 00 00 | 07 00 00 88 01 08 4d 65 |........|......Me|
|00001940| 6e 75 49 74 65 6d 00 00 | 00 00 00 00 00 00 00 18 |nuItem..|........|
|00001950| 4f 70 65 6e 20 44 6f 63 | 74 6f 72 73 20 44 61 74 |Open Doc|tors Dat|
|00001960| 61 62 61 73 65 2e 2e 2e | 17 46 69 6c 65 4f 70 65 |abase...|.FileOpe|
|00001970| 6e 44 6f 63 74 6f 72 73 | 44 61 74 61 62 61 73 65 |nDoctors|Database|
|00001980| 80 80 80 80 10 01 4f 00 | 00 00 00 07 00 00 88 01 |......O.|........|
|00001990| 08 4d 65 6e 75 49 74 65 | 6d 00 00 00 00 00 00 00 |.MenuIte|m.......|
|000019a0| 00 00 01 2d 00 80 80 80 | 80 10 00 00 00 00 00 07 |...-....|........|
|000019b0| 00 00 88 01 08 4d 65 6e | 75 49 74 65 6d 00 00 00 |.....Men|uItem...|
|000019c0| 00 00 00 00 00 00 05 43 | 6c 6f 73 65 09 46 69 6c |.......C|lose.Fil|
|000019d0| 65 43 6c 6f 73 65 80 80 | 80 80 10 01 57 00 00 00 |eClose..|....W...|
|000019e0| 00 07 00 00 88 01 08 4d | 65 6e 75 49 74 65 6d 00 |.......M|enuItem.|
|000019f0| 00 00 00 00 00 00 00 00 | 01 2d 00 80 80 80 80 10 |........|.-......|
|00001a00| 00 00 00 00 00 07 00 00 | 88 01 08 4d 65 6e 75 49 |........|...MenuI|
|00001a10| 74 65 6d 00 00 00 00 00 | 00 00 00 00 04 51 75 69 |tem.....|.....Qui|
|00001a20| 74 08 46 69 6c 65 51 75 | 69 74 80 80 80 80 10 01 |t.FileQu|it......|
|00001a30| 51 00 00 00 00 07 00 00 | 88 01 0c 51 75 69 74 4d |Q.......|...QuitM|
|00001a40| 65 6e 75 49 74 65 6d 00 | 00 00 00 00 00 00 00 02 |enuItem.|........|
|00001a50| 00 00 80 80 80 80 10 00 | 00 00 00 00 07 00 00 88 |........|........|
|00001a60| 01 08 4d 65 6e 75 49 74 | 65 6d 00 00 00 00 00 00 |..MenuIt|em......|
|00001a70| 00 00 00 04 45 64 69 74 | 00 80 80 80 80 10 00 00 |....Edit|........|
|00001a80| 00 00 00 07 00 00 88 01 | 08 4d 65 6e 75 49 74 65 |........|.MenuIte|
|00001a90| 6d 00 00 00 00 00 00 00 | 07 00 04 55 6e 64 6f 08 |m.......|...Undo.|
|00001aa0| 45 64 69 74 55 6e 64 6f | 80 80 80 80 10 01 5a 00 |EditUndo|......Z.|
|00001ab0| 00 00 00 07 00 00 88 01 | 08 4d 65 6e 75 49 74 65 |........|.MenuIte|
|00001ac0| 6d 00 00 00 00 00 00 00 | 00 00 01 2d 00 80 80 80 |m.......|...-....|
|00001ad0| 80 10 00 00 00 00 00 07 | 00 00 88 01 08 4d 65 6e |........|.....Men|
|00001ae0| 75 49 74 65 6d 00 00 00 | 00 00 00 00 00 00 03 43 |uItem...|.......C|
|00001af0| 75 74 07 45 64 69 74 43 | 75 74 80 80 80 80 10 01 |ut.EditC|ut......|
|00001b00| 58 00 00 00 00 07 00 00 | 88 01 08 4d 65 6e 75 49 |X.......|...MenuI|
|00001b10| 74 65 6d 00 00 00 00 00 | 00 00 00 00 04 43 6f 70 |tem.....|.....Cop|
|00001b20| 79 08 45 64 69 74 43 6f | 70 79 80 80 80 80 10 01 |y.EditCo|py......|
|00001b30| 43 00 00 00 00 07 00 00 | 88 01 08 4d 65 6e 75 49 |C.......|...MenuI|
|00001b40| 74 65 6d 00 00 00 00 00 | 00 00 00 00 05 50 61 73 |tem.....|.....Pas|
|00001b50| 74 65 09 45 64 69 74 50 | 61 73 74 65 80 80 80 80 |te.EditP|aste....|
|00001b60| 10 01 56 00 00 00 00 07 | 00 00 88 01 08 4d 65 6e |..V.....|.....Men|
|00001b70| 75 49 74 65 6d 00 00 00 | 00 00 00 00 00 00 05 43 |uItem...|.......C|
|00001b80| 6c 65 61 72 09 45 64 69 | 74 43 6c 65 61 72 80 80 |lear.Edi|tClear..|
|00001b90| 80 80 10 00 00 00 00 00 | 07 00 00 88 01 08 4d 65 |........|......Me|
|00001ba0| 6e 75 49 74 65 6d 00 00 | 00 00 00 00 00 00 02 00 |nuItem..|........|
|00001bb0| 00 80 80 80 80 10 00 00 | 00 00 00 07 00 00 88 01 |........|........|
|00001bc0| 08 4d 65 6e 75 49 74 65 | 6d 00 00 00 00 00 00 00 |.MenuIte|m.......|
|00001bd0| 00 00 07 44 6f 63 74 6f | 72 73 00 80 80 80 80 10 |...Docto|rs......|
|00001be0| 00 00 00 00 00 07 00 00 | 88 01 08 4d 65 6e 75 49 |........|...MenuI|
|00001bf0| 74 65 6d 00 00 00 00 00 | 00 00 06 00 07 46 69 6e |tem.....|.....Fin|
|00001c00| 64 2e 2e 2e 0b 44 6f 63 | 74 6f 72 73 46 69 6e 64 |d....Doc|torsFind|
|00001c10| 80 80 80 80 10 01 46 00 | 00 00 00 07 00 00 88 01 |......F.|........|
|00001c20| 08 4d 65 6e 75 49 74 65 | 6d 00 00 00 00 00 00 00 |.MenuIte|m.......|
|00001c30| 00 00 09 4d 6f 64 69 66 | 79 2e 2e 2e 0d 44 6f 63 |...Modif|y....Doc|
|00001c40| 74 6f 72 73 4d 6f 64 69 | 66 79 80 80 80 80 10 01 |torsModi|fy......|
|00001c50| 4d 00 00 00 00 07 00 00 | 88 01 08 4d 65 6e 75 49 |M.......|...MenuI|
|00001c60| 74 65 6d 00 00 00 00 00 | 00 00 00 00 01 2d 00 80 |tem.....|.....-..|
|00001c70| 80 80 80 10 00 00 00 00 | 00 07 00 00 88 01 08 4d |........|.......M|
|00001c80| 65 6e 75 49 74 65 6d 00 | 00 00 00 00 00 00 00 00 |enuItem.|........|
|00001c90| 09 44 65 6c 65 74 65 2e | 2e 2e 0d 44 6f 63 74 6f |.Delete.|...Docto|
|00001ca0| 72 73 44 65 6c 65 74 65 | 80 80 80 80 10 00 00 00 |rsDelete|........|
|00001cb0| 00 00 07 00 00 88 01 08 | 4d 65 6e 75 49 74 65 6d |........|MenuItem|
|00001cc0| 00 00 00 00 00 00 00 00 | 00 09 49 6d 70 6f 72 74 |........|..Import|
|00001cd0| 2e 2e 2e 0d 44 6f 63 74 | 6f 72 73 49 6d 70 6f 72 |....Doct|orsImpor|
|00001ce0| 74 80 80 80 80 10 00 00 | 00 00 00 07 00 00 88 01 |t.......|........|
|00001cf0| 08 4d 65 6e 75 49 74 65 | 6d 00 00 00 00 00 00 00 |.MenuIte|m.......|
|00001d00| 00 02 00 00 80 80 80 80 | 10 00 00 00 00 00 07 00 |........|........|
|00001d10| 00 88 01 08 4d 65 6e 75 | 49 74 65 6d 00 00 00 00 |....Menu|Item....|
|00001d20| 00 00 00 00 02 00 00 80 | 80 80 80 10 00 00 00 00 |........|........|
|00001d30| 00 07 00 00 88 01 08 4d | 65 6e 75 49 74 65 6d 00 |.......M|enuItem.|
|00001d40| 00 00 00 00 00 00 00 05 | 41 05 43 6c 61 73 73 07 |........|A.Class.|
|00001d50| 64 62 66 69 65 6c 64 ad | 01 84 04 80 0c ae 08 07 |dbfield.|........|
|00001d60| 00 07 64 62 66 69 65 6c | 64 88 02 09 45 64 69 74 |..dbfiel|d...Edit|
|00001d70| 46 69 65 6c 64 00 00 02 | 03 47 65 74 1b 53 65 6c |Field...|.Get.Sel|
|00001d80| 65 63 74 69 6f 6e 20 61 | 73 20 44 61 74 61 62 61 |ection a|s Databa|
|00001d90| 73 65 43 75 72 73 6f 72 | 00 00 01 00 01 00 03 24 |seCursor|.......$|
|00001da0| 53 75 62 20 47 65 74 28 | 53 65 6c 65 63 74 69 6f |Sub Get(|Selectio|
|00001db0| 6e 20 61 73 20 44 61 74 | 61 62 61 73 65 43 75 72 |n as Dat|abaseCur|
|00001dc0| 73 6f 72 29 24 74 65 78 | 74 3d 73 65 6c 65 63 74 |sor)$tex|t=select|
|00001dd0| 69 6f 6e 2e 46 69 65 6c | 64 28 6e 61 6d 65 29 2e |ion.Fiel|d(name).|
|00001de0| 67 65 74 53 74 72 69 6e | 67 07 45 6e 64 20 53 75 |getStrin|g.End Su|
|00001df0| 62 03 53 65 74 1b 53 65 | 6c 65 63 74 69 6f 6e 20 |b.Set.Se|lection |
|00001e00| 61 73 20 44 61 74 61 62 | 61 73 65 43 75 72 73 6f |as Datab|aseCurso|
|00001e10| 72 00 00 02 00 02 00 04 | 24 53 75 62 20 53 65 74 |r.......|$Sub Set|
|00001e20| 28 53 65 6c 65 63 74 69 | 6f 6e 20 61 73 20 44 61 |(Selecti|on as Da|
|00001e30| 74 61 62 61 73 65 43 75 | 72 73 6f 72 29 26 73 65 |tabaseCu|rsor)&se|
|00001e40| 6c 65 63 74 69 6f 6e 2e | 46 69 65 6c 64 28 6e 61 |lection.|Field(na|
|00001e50| 6d 65 29 2e 73 65 74 53 | 74 72 69 6e 67 28 74 65 |me).setS|tring(te|
|00001e60| 78 74 29 20 0d 72 65 61 | 64 6f 6e 6c 79 3d 74 72 |xt) .rea|donly=tr|
|00001e70| 75 65 07 45 6e 64 20 53 | 75 62 00 00 00 00 0b 64 |ue.End S|ub.....d|
|00001e80| 62 49 6e 74 65 72 66 61 | 63 65 06 41 06 4d 6f 64 |bInterfa|ce.A.Mod|
|00001e90| 75 6c 65 0f 44 61 74 61 | 62 61 73 65 4d 65 74 68 |ule.Data|baseMeth|
|00001ea0| 6f 64 73 31 b7 03 8e 0c | 93 09 07 00 0f 44 61 74 |ods1....|.....Dat|
|00001eb0| 61 62 61 73 65 4d 65 74 | 68 6f 64 73 18 00 00 00 |abaseMet|hods....|
|00001ec0| 04 0d 47 65 74 43 75 72 | 72 65 6e 74 52 6f 77 30 |..GetCur|rentRow0|
|00001ed0| 53 65 6c 65 63 74 69 6f | 6e 20 61 73 20 64 61 74 |Selectio|n as dat|
|00001ee0| 61 62 61 73 65 63 75 72 | 73 6f 72 2c 20 74 68 65 |abasecur|sor, the|
|00001ef0| 57 69 6e 64 6f 77 20 61 | 73 20 57 69 6e 64 6f 77 |Window a|s Window|
|00001f00| 00 00 01 00 06 04 08 83 | 01 53 75 62 20 47 65 74 |........|.Sub Get|
|00001f10| 43 75 72 72 65 6e 74 52 | 6f 77 28 53 65 6c 65 63 |CurrentR|ow(Selec|
|00001f20| 74 69 6f 6e 20 61 73 20 | 64 61 74 61 62 61 73 65 |tion as |database|
|00001f30| 63 75 72 73 6f 72 2c 20 | 74 68 65 57 69 6e 64 6f |cursor, |theWindo|
|00001f40| 77 20 61 73 20 57 69 6e | 64 6f 77 29 10 64 69 6d |w as Win|dow).dim|
|00001f50| 20 69 20 61 73 20 69 6e | 74 65 67 65 72 23 66 6f | i as in|teger#fo|
|00001f60| 72 20 69 3d 30 20 74 6f | 20 74 68 65 57 69 6e 64 |r i=0 to| theWind|
|00001f70| 6f 77 2e 63 6f 6e 74 72 | 6f 6c 63 6f 75 6e 74 2d |ow.contr|olcount-|
|00001f80| 31 2c 69 66 20 74 68 65 | 57 69 6e 64 6f 77 2e 63 |1,if the|Window.c|
|00001f90| 6f 6e 74 72 6f 6c 28 69 | 29 20 69 73 61 20 64 62 |ontrol(i|) isa db|
|00001fa0| 49 6e 74 65 72 66 61 63 | 65 20 74 68 65 6e 30 64 |Interfac|e then0d|
|00001fb0| 62 49 6e 74 65 72 66 61 | 63 65 28 74 68 65 57 69 |bInterfa|ce(theWi|
|00001fc0| 6e 64 6f 77 2e 63 6f 6e | 74 72 6f 6c 28 69 29 29 |ndow.con|trol(i))|
|00001fd0| 2e 67 65 74 28 73 65 6c | 65 63 74 69 6f 6e 29 06 |.get(sel|ection).|
|00001fe0| 65 6e 64 20 69 66 04 6e | 65 78 74 07 45 6e 64 20 |end if.n|ext.End |
|00001ff0| 53 75 62 10 75 70 64 61 | 74 65 43 75 72 72 65 6e |Sub.upda|teCurren|
|00002000| 74 52 6f 77 30 73 65 6c | 65 63 74 69 6f 6e 20 61 |tRow0sel|ection a|
|00002010| 73 20 64 61 74 61 62 61 | 73 65 43 75 72 73 6f 72 |s databa|seCursor|
|00002020| 2c 20 74 68 65 57 69 6e | 64 6f 77 20 61 73 20 77 |, theWin|dow as w|
|00002030| 69 6e 64 6f 77 00 00 0b | 2b 0b 00 10 86 01 53 75 |indow...|+.....Su|
|00002040| 62 20 75 70 64 61 74 65 | 43 75 72 72 65 6e 74 52 |b update|CurrentR|
|00002050| 6f 77 28 73 65 6c 65 63 | 74 69 6f 6e 20 61 73 20 |ow(selec|tion as |
|00002060| 64 61 74 61 62 61 73 65 | 43 75 72 73 6f 72 2c 20 |database|Cursor, |
|00002070| 74 68 65 57 69 6e 64 6f | 77 20 61 73 20 77 69 6e |theWindo|w as win|
|00002080| 64 6f 77 29 10 64 69 6d | 20 69 20 61 73 20 69 6e |dow).dim| i as in|
|00002090| 74 65 67 65 72 25 64 69 | 6d 20 66 69 65 6c 64 6e |teger%di|m fieldn|
|000020a0| 61 6d 65 2c 74 68 65 66 | 69 65 6c 64 56 61 6c 75 |ame,thef|ieldValu|
|000020b0| 65 20 61 73 20 73 74 72 | 69 6e 67 17 64 69 6d 20 |e as str|ing.dim |
|000020c0| 74 68 65 46 69 65 6c 64 | 20 61 73 20 64 62 46 69 |theField| as dbFi|
|000020d0| 65 6c 64 00 8d 01 66 6f | 72 20 69 3d 30 20 74 6f |eld...fo|r i=0 to|
|000020e0| 20 74 68 65 57 69 6e 64 | 6f 77 2e 63 6f 6e 74 72 | theWind|ow.contr|
|000020f0| 6f 6c 63 6f 75 6e 74 2d | 31 20 2f 2f 6c 6f 6f 70 |olcount-|1 //loop|
|00002100| 20 74 68 72 6f 75 67 68 | 20 74 68 65 20 63 6f 6e | through| the con|
|00002110| 74 72 6f 6c 73 20 69 6e | 20 74 68 65 20 77 69 6e |trols in| the win|
|00002120| 64 6f 77 86 01 69 66 20 | 74 68 65 57 69 6e 64 6f |dow..if |theWindo|
|00002130| 77 2e 63 6f 6e 74 72 6f | 6c 28 69 29 20 69 73 61 |w.contro|l(i) isa|
|00002140| 20 64 62 66 69 65 6c 64 | 20 74 68 65 6e 20 2f 2f | dbfield| then //|
|00002150| 69 66 20 74 68 65 20 63 | 6f 6e 74 72 6f 6c 20 69 |if the c|ontrol i|
|00002160| 73 20 61 20 64 62 66 69 | 65 6c 64 3c 66 69 65 6c |s a dbfi|eld<fiel|
|00002170| 64 4e 61 6d 65 3d 74 68 | 65 57 69 6e 64 6f 77 2e |dName=th|eWindow.|
|00002180| 63 6f 6e 74 72 6f 6c 28 | 69 29 2e 6e 61 6d 65 20 |control(|i).name |
|00002190| 2f 2f 67 65 74 20 74 68 | 65 20 63 6f 6e 74 72 6f |//get th|e contro|
|000021a0| 6c 27 73 20 6e 61 6d 65 | b0 01 74 68 65 46 69 65 |l's name|..theFie|
|000021b0| 6c 64 3d 64 62 66 69 65 | 6c 64 28 74 68 65 57 69 |ld=dbfie|ld(theWi|
|000021c0| 6e 64 6f 77 2e 63 6f 6e | 74 72 6f 6c 28 69 29 29 |ndow.con|trol(i))|
|000021d0| 20 2f 2f 72 65 63 61 73 | 74 20 74 68 65 20 67 65 | //recas|t the ge|
|000021e0| 6e 65 72 69 63 20 63 6f | 6e 74 72 6f 6c 20 61 73 |neric co|ntrol as|
|000021f0| 20 61 20 64 62 66 69 65 | 6c 64 20 73 6f 20 77 65 | a dbfie|ld so we|
|00002200| 20 63 61 6e 20 67 65 74 | 20 74 68 65 20 74 65 78 | can get| the tex|
|00002210| 74 20 70 72 6f 70 65 72 | 74 79 93 01 74 68 65 46 |t proper|ty..theF|
|00002220| 69 65 6c 64 56 61 6c 75 | 65 3d 74 68 65 46 69 65 |ieldValu|e=theFie|
|00002230| 6c 64 2e 74 65 78 74 20 | 2f 2f 67 65 74 20 74 68 |ld.text |//get th|
|00002240| 65 20 76 61 6c 75 65 20 | 6f 66 20 74 68 65 20 74 |e value |of the t|
|00002250| 65 78 74 20 70 72 6f 70 | 65 72 74 79 20 66 72 6f |ext prop|erty fro|
|00002260| 6d 20 74 68 65 20 65 64 | 69 74 66 69 65 6c 64 bc |m the ed|itfield.|
|00002270| 01 73 65 6c 65 63 74 69 | 6f 6e 2e 46 69 65 6c 64 |.selecti|on.Field|
|00002280| 28 66 69 65 6c 64 4e 61 | 6d 65 29 2e 73 65 74 53 |(fieldNa|me).setS|
|00002290| 74 72 69 6e 67 28 74 68 | 65 46 69 65 6c 64 56 61 |tring(th|eFieldVa|
|000022a0| 6c 75 65 29 20 2f 2f 73 | 65 74 20 74 68 65 20 76 |lue) //s|et the v|
|000022b0| 61 6c 75 65 20 6f 66 20 | 74 68 65 20 63 6f 6c 75 |alue of |the colu|
|000022c0| 6d 6e 20 77 68 6f 73 65 | 20 6e 61 6d 65 20 6d 61 |mn whose| name ma|
|000022d0| 74 63 68 65 73 20 74 68 | 65 20 6e 61 6d 65 20 6f |tches th|e name o|
|000022e0| 66 20 74 68 65 20 64 62 | 66 69 65 6c 64 91 01 64 |f the db|field..d|
|000022f0| 62 66 69 65 6c 64 28 74 | 68 65 57 69 6e 64 6f 77 |bfield(t|heWindow|
|00002300| 2e 63 6f 6e 74 72 6f 6c | 28 69 29 29 2e 72 65 61 |.control|(i)).rea|
|00002310| 64 6f 6e 6c 79 3d 74 72 | 75 65 20 2f 2f 73 65 74 |donly=tr|ue //set|
|00002320| 20 74 68 65 20 65 64 69 | 74 66 69 65 6c 64 20 62 | the edi|tfield b|
|00002330| 61 63 6b 20 74 6f 20 72 | 65 61 64 20 6f 6e 6c 79 |ack to r|ead only|
|00002340| 06 65 6e 64 20 69 66 04 | 6e 65 78 74 10 73 65 6c |.end if.|next.sel|
|00002350| 65 63 74 69 6f 6e 2e 75 | 70 64 61 74 65 07 45 6e |ection.u|pdate.En|
|00002360| 64 20 53 75 62 13 52 65 | 63 6f 72 64 52 65 61 64 |d Sub.Re|cordRead|
|00002370| 4f 6e 6c 79 53 74 61 74 | 65 28 52 65 61 64 4f 6e |OnlyStat|e(ReadOn|
|00002380| 6c 79 20 61 73 20 42 6f | 6f 6c 65 61 6e 2c 20 74 |ly as Bo|olean, t|
|00002390| 68 65 57 69 6e 64 6f 77 | 20 61 73 20 57 69 6e 64 |heWindow| as Wind|
|000023a0| 6f 77 00 00 04 31 04 31 | 08 81 01 53 75 62 20 52 |ow...1.1|...Sub R|
|000023b0| 65 63 6f 72 64 52 65 61 | 64 4f 6e 6c 79 53 74 61 |ecordRea|dOnlySta|
|000023c0| 74 65 28 52 65 61 64 4f | 6e 6c 79 20 61 73 20 42 |te(ReadO|nly as B|
|000023d0| 6f 6f 6c 65 61 6e 2c 20 | 74 68 65 57 69 6e 64 6f |oolean, |theWindo|
|000023e0| 77 20 61 73 20 57 69 6e | 64 6f 77 29 10 64 69 6d |w as Win|dow).dim|
|000023f0| 20 69 20 61 73 20 69 6e | 74 65 67 65 72 23 66 6f | i as in|teger#fo|
|00002400| 72 20 69 3d 30 20 74 6f | 20 74 68 65 57 69 6e 64 |r i=0 to| theWind|
|00002410| 6f 77 2e 63 6f 6e 74 72 | 6f 6c 63 6f 75 6e 74 2d |ow.contr|olcount-|
|00002420| 31 28 69 66 20 74 68 65 | 57 69 6e 64 6f 77 2e 63 |1(if the|Window.c|
|00002430| 6f 6e 74 72 6f 6c 28 69 | 29 20 69 73 61 20 64 62 |ontrol(i|) isa db|
|00002440| 46 69 65 6c 64 20 74 68 | 65 6e 31 65 64 69 74 66 |Field th|en1editf|
|00002450| 69 65 6c 64 28 74 68 65 | 57 69 6e 64 6f 77 2e 63 |ield(the|Window.c|
|00002460| 6f 6e 74 72 6f 6c 28 69 | 29 29 2e 72 65 61 64 6f |ontrol(i|)).reado|
|00002470| 6e 6c 79 3d 52 65 61 64 | 4f 6e 6c 79 06 65 6e 64 |nly=Read|Only.end|
|00002480| 20 69 66 04 6e 65 78 74 | 07 45 6e 64 20 53 75 62 | if.next|.End Sub|
|00002490| 13 46 69 6e 64 49 6e 4c | 69 73 74 62 6f 78 43 6f |.FindInL|istboxCo|
|000024a0| 6c 75 6d 6e 35 53 6f 75 | 72 63 65 20 61 73 20 4c |lumn5Sou|rce as L|
|000024b0| 69 73 74 62 6f 78 2c 20 | 43 6f 6c 75 6d 6e 20 61 |istbox, |Column a|
|000024c0| 73 20 49 6e 74 65 67 65 | 72 2c 20 56 61 6c 75 65 |s Intege|r, Value|
|000024d0| 20 61 73 20 53 74 72 69 | 6e 67 07 49 6e 74 65 67 | as Stri|ng.Integ|
|000024e0| 65 72 00 03 17 03 17 09 | 9e 01 46 75 6e 63 74 69 |er......|..Functi|
|000024f0| 6f 6e 20 46 69 6e 64 49 | 6e 4c 69 73 74 62 6f 78 |on FindI|nListbox|
|00002500| 43 6f 6c 75 6d 6e 28 53 | 6f 75 72 63 65 20 61 73 |Column(S|ource as|
|00002510| 20 4c 69 73 74 62 6f 78 | 2c 20 43 6f 6c 75 6d 6e | Listbox|, Column|
|00002520| 20 61 73 20 49 6e 74 65 | 67 65 72 2c 20 56 61 6c | as Inte|ger, Val|
|00002530| 75 65 20 61 73 20 53 74 | 72 69 6e 67 29 20 41 73 |ue as St|ring) As|
|00002540| 20 49 6e 74 65 67 65 72 | 10 64 69 6d 20 69 20 61 | Integer|.dim i a|
|00002550| 73 20 69 6e 74 65 67 65 | 72 1d 66 6f 72 20 69 3d |s intege|r.for i=|
|00002560| 30 20 74 6f 20 53 6f 75 | 72 63 65 2e 6c 69 73 74 |0 to Sou|rce.list|
|00002570| 63 6f 75 6e 74 2d 31 25 | 69 66 20 53 6f 75 72 63 |count-1%|if Sourc|
|00002580| 65 2e 63 65 6c 6c 28 69 | 2c 43 6f 6c 75 6d 6e 29 |e.cell(i|,Column)|
|00002590| 20 3d 20 56 61 6c 75 65 | 20 74 68 65 6e 08 72 65 | = Value| then.re|
|000025a0| 74 75 72 6e 20 69 04 65 | 78 69 74 06 65 6e 64 20 |turn i.e|xit.end |
|000025b0| 69 66 04 6e 65 78 74 0c | 45 6e 64 20 46 75 6e 63 |if.next.|End Func|
|000025c0| 74 69 6f 6e 00 00 00 00 | 00 07 41 05 43 6c 61 73 |tion....|..A.Clas|
|000025d0| 73 0b 64 62 49 6e 74 65 | 72 66 61 63 65 a4 01 a3 |s.dbInte|rface...|
|000025e0| 01 b4 07 8f 06 07 00 0b | 64 62 49 6e 74 65 72 66 |........|dbInterf|
|000025f0| 61 63 65 18 00 01 00 02 | 03 47 65 74 1b 73 65 6c |ace.....|.Get.sel|
|00002600| 65 63 74 69 6f 6e 20 61 | 73 20 64 61 74 61 62 61 |ection a|s databa|
|00002610| 73 65 63 75 72 73 6f 72 | 00 08 01 00 01 00 03 24 |secursor|.......$|
|00002620| 53 75 62 20 47 65 74 28 | 73 65 6c 65 63 74 69 6f |Sub Get(|selectio|
|00002630| 6e 20 61 73 20 64 61 74 | 61 62 61 73 65 63 75 72 |n as dat|abasecur|
|00002640| 73 6f 72 29 00 07 45 6e | 64 20 53 75 62 03 53 65 |sor)..En|d Sub.Se|
|00002650| 74 1b 53 65 6c 65 63 74 | 69 6f 6e 20 61 73 20 44 |t.Select|ion as D|
|00002660| 61 74 61 62 61 73 65 43 | 75 72 73 6f 72 00 08 01 |atabaseC|ursor...|
|00002670| 00 01 00 03 24 53 75 62 | 20 53 65 74 28 53 65 6c |....$Sub| Set(Sel|
|00002680| 65 63 74 69 6f 6e 20 61 | 73 20 44 61 74 61 62 61 |ection a|s Databa|
|00002690| 73 65 43 75 72 73 6f 72 | 29 00 07 45 6e 64 20 53 |seCursor|)..End S|
|000026a0| 75 62 00 00 00 00 00 09 | 41 05 43 6c 61 73 73 03 |ub......|A.Class.|
|000026b0| 61 70 70 1e a5 03 a5 0c | b4 08 07 00 03 61 70 70 |app.....|.....app|
|000026c0| 1c 0b 41 70 70 6c 69 63 | 61 74 69 6f 6e 00 00 00 |..Applic|ation...|
|000026d0| 00 01 0f 45 6e 61 62 6c | 65 4d 65 6e 75 49 74 65 |...Enabl|eMenuIte|
|000026e0| 6d 73 05 06 05 06 07 15 | 53 75 62 20 45 6e 61 62 |ms......|Sub Enab|
|000026f0| 6c 65 4d 65 6e 75 49 74 | 65 6d 73 28 29 2b 69 66 |leMenuIt|ems()+if|
|00002700| 20 47 65 74 46 6f 6c 64 | 65 72 49 74 65 6d 28 22 | GetFold|erItem("|
|00002710| 64 6f 63 74 6f 72 73 2e | 72 64 62 22 29 2e 65 78 |doctors.|rdb").ex|
|00002720| 69 73 74 73 20 74 68 65 | 6e 24 66 69 6c 65 6f 70 |ists the|n$fileop|
|00002730| 65 6e 64 6f 63 74 6f 72 | 73 64 61 74 61 62 61 73 |endoctor|sdatabas|
|00002740| 65 2e 65 6e 61 62 6c 65 | 64 3d 74 72 75 65 04 65 |e.enable|d=true.e|
|00002750| 6c 73 65 23 66 69 6c 65 | 6e 65 77 64 6f 63 74 6f |lse#file|newdocto|
|00002760| 72 73 64 61 74 61 62 61 | 73 65 2e 65 6e 61 62 6c |rsdataba|se.enabl|
|00002770| 65 64 3d 74 72 75 65 06 | 65 6e 64 20 69 66 07 45 |ed=true.|end if.E|
|00002780| 6e 64 20 53 75 62 03 16 | 46 69 6c 65 4e 65 77 44 |nd Sub..|FileNewD|
|00002790| 6f 63 74 6f 72 73 44 61 | 74 61 62 61 73 65 03 00 |octorsDa|tabase..|
|000027a0| 03 00 0d 1a 46 75 6e 63 | 74 69 6f 6e 20 41 63 74 |....Func|tion Act|
|000027b0| 69 6f 6e 20 41 73 20 42 | 6f 6f 6c 65 61 6e 18 44 |ion As B|oolean.D|
|000027c0| 69 6d 20 64 62 46 69 6c | 65 20 61 73 20 46 6f 6c |im dbFil|e as Fol|
|000027d0| 64 65 72 49 74 65 6d 12 | 44 69 6d 20 64 62 20 61 |derItem.|Dim db a|
|000027e0| 73 20 44 61 74 61 62 61 | 73 65 00 25 64 62 46 69 |s Databa|se.%dbFi|
|000027f0| 6c 65 20 3d 20 47 65 74 | 46 6f 6c 64 65 72 49 74 |le = Get|FolderIt|
|00002800| 65 6d 28 22 64 6f 63 74 | 6f 72 73 2e 72 64 62 22 |em("doct|ors.rdb"|
|00002810| 29 1c 64 62 20 3d 20 6e | 65 77 52 45 41 4c 44 61 |).db = n|ewREALDa|
|00002820| 74 61 62 61 73 65 28 64 | 62 66 69 6c 65 29 11 69 |tabase(d|bfile).i|
|00002830| 66 20 64 62 20 3c 3e 20 | 6e 69 6c 20 74 68 65 6e |f db <> |nil then|
|00002840| 87 03 64 62 2e 53 51 4c | 45 78 65 63 75 74 65 28 |..db.SQL|Execute(|
|00002850| 22 63 72 65 61 74 65 20 | 74 61 62 6c 65 20 44 6f |"create |table Do|
|00002860| 63 74 6f 72 73 28 49 44 | 20 69 6e 74 65 67 65 72 |ctors(ID| integer|
|00002870| 2c 20 46 69 72 73 74 20 | 76 61 72 63 68 61 72 28 |, First |varchar(|
|00002880| 32 30 29 2c 20 4c 61 73 | 74 20 76 61 72 63 68 61 |20), Las|t varcha|
|00002890| 72 28 34 30 29 2c 20 53 | 70 65 63 69 61 6c 74 79 |r(40), S|pecialty|
|000028a0| 20 76 61 72 43 68 61 72 | 28 36 30 29 2c 20 41 64 | varChar|(60), Ad|
|000028b0| 64 72 65 73 73 20 76 61 | 72 63 68 61 72 28 36 30 |dress va|rchar(60|
|000028c0| 29 2c 20 43 69 74 79 20 | 76 61 72 63 68 61 72 28 |), City |varchar(|
|000028d0| 33 30 29 2c 20 53 74 61 | 74 65 20 76 61 72 63 68 |30), Sta|te varch|
|000028e0| 61 72 28 32 29 2c 20 5a | 69 70 20 76 61 72 63 68 |ar(2), Z|ip varch|
|000028f0| 61 72 28 35 29 2c 70 72 | 69 6d 61 72 79 20 6b 65 |ar(5),pr|imary ke|
|00002900| 79 20 28 49 44 29 29 22 | 29 82 02 64 62 2e 53 51 |y (ID))"|)..db.SQ|
|00002910| 4c 45 78 65 63 75 74 65 | 28 22 63 72 65 61 74 65 |LExecute|("create|
|00002920| 20 74 61 62 6c 65 20 50 | 68 6f 6e 65 73 28 49 44 | table P|hones(ID|
|00002930| 20 69 6e 74 65 67 65 72 | 2c 20 5b 44 6f 63 74 6f | integer|, [Docto|
|00002940| 72 20 49 44 5d 20 69 6e | 74 65 67 65 72 2c 20 5b |r ID] in|teger, [|
|00002950| 41 72 65 61 20 43 6f 64 | 65 5d 20 76 61 72 63 68 |Area Cod|e] varch|
|00002960| 61 72 28 33 29 2c 20 4e | 75 6d 62 65 72 20 76 61 |ar(3), N|umber va|
|00002970| 72 43 68 61 72 28 32 30 | 29 2c 70 72 69 6d 61 72 |rChar(20|),primar|
|00002980| 79 20 6b 65 79 20 28 49 | 44 29 29 22 29 10 44 6f |y key (I|D))").Do|
|00002990| 63 74 6f 72 73 4c 69 73 | 74 2e 73 68 6f 77 11 44 |ctorsLis|t.show.D|
|000029a0| 6f 63 74 6f 72 73 4c 69 | 73 74 2e 64 62 3d 64 62 |octorsLi|st.db=db|
|000029b0| 06 65 6e 64 20 69 66 0c | 45 6e 64 20 46 75 6e 63 |.end if.|End Func|
|000029c0| 74 69 6f 6e 17 46 69 6c | 65 4f 70 65 6e 44 6f 63 |tion.Fil|eOpenDoc|
|000029d0| 74 6f 72 73 44 61 74 61 | 62 61 73 65 04 25 04 00 |torsData|base.%..|
|000029e0| 0f 1a 46 75 6e 63 74 69 | 6f 6e 20 41 63 74 69 6f |..Functi|on Actio|
|000029f0| 6e 20 41 73 20 42 6f 6f | 6c 65 61 6e 18 44 69 6d |n As Boo|lean.Dim|
|00002a00| 20 64 62 46 69 6c 65 20 | 61 73 20 46 6f 6c 64 65 | dbFile |as Folde|
|00002a10| 72 49 74 65 6d 12 44 69 | 6d 20 64 62 20 61 73 20 |rItem.Di|m db as |
|00002a20| 44 61 74 61 62 61 73 65 | 00 25 64 62 46 69 6c 65 |Database|.%dbFile|
|00002a30| 20 3d 20 47 65 74 46 6f | 6c 64 65 72 49 74 65 6d | = GetFo|lderItem|
|00002a40| 28 22 64 6f 63 74 6f 72 | 73 2e 72 64 62 22 29 1d |("doctor|s.rdb").|
|00002a50| 64 62 20 3d 20 6f 70 65 | 6e 52 45 41 4c 44 61 74 |db = ope|nREALDat|
|00002a60| 61 62 61 73 65 28 64 62 | 46 69 6c 65 29 10 69 66 |abase(db|File).if|
|00002a70| 20 64 62 20 3d 20 4e 69 | 6c 20 74 68 65 6e 04 62 | db = Ni|l then.b|
|00002a80| 65 65 70 a8 01 6d 73 67 | 42 6f 78 20 22 54 68 65 |eep..msg|Box "The|
|00002a90| 20 44 6f 63 74 6f 72 73 | 20 64 61 74 61 20 66 69 | Doctors| data fi|
|00002aa0| 6c 65 20 69 73 20 64 61 | 6d 61 67 65 64 2e 20 50 |le is da|maged. P|
|00002ab0| 6c 65 61 73 65 20 64 65 | 6c 65 74 65 20 69 74 2c |lease de|lete it,|
|00002ac0| 20 63 72 65 61 74 65 20 | 61 20 6e 65 77 20 6f 6e | create |a new on|
|00002ad0| 65 20 61 6e 64 20 72 65 | 2d 69 6d 70 6f 72 74 20 |e and re|-import |
|00002ae0| 74 68 65 20 72 65 63 6f | 72 64 73 2e 22 04 65 6c |the reco|rds.".el|
|00002af0| 73 65 10 44 6f 63 74 6f | 72 73 4c 69 73 74 2e 53 |se.Docto|rsList.S|
|00002b00| 68 6f 77 11 44 6f 63 74 | 6f 72 73 4c 69 73 74 2e |how.Doct|orsList.|
|00002b10| 64 62 3d 64 62 06 65 6e | 64 20 69 66 00 0c 45 6e |db=db.en|d if..En|
|00002b20| 64 20 46 75 6e 63 74 69 | 6f 6e 0a 44 6f 63 74 6f |d Functi|on.Docto|
|00002b30| 72 73 4e 65 77 05 1c 05 | 1c 07 1a 46 75 6e 63 74 |rsNew...|...Funct|
|00002b40| 69 6f 6e 20 41 63 74 69 | 6f 6e 20 41 73 20 42 6f |ion Acti|on As Bo|
|00002b50| 6f 6c 65 61 6e 14 64 69 | 6d 20 77 20 61 73 20 44 |olean.di|m w as D|
|00002b60| 6f 63 74 6f 72 45 6e 74 | 72 79 13 77 20 3d 20 6e |octorEnt|ry.w = n|
|00002b70| 65 77 20 44 6f 63 74 6f | 72 45 6e 74 72 79 14 77 |ew Docto|rEntry.w|
|00002b80| 2e 74 69 74 6c 65 3d 22 | 4e 65 77 20 44 6f 63 74 |.title="|New Doct|
|00002b90| 6f 72 22 1a 77 2e 65 64 | 69 74 62 75 74 74 6f 6e |or".w.ed|itbutton|
|00002ba0| 2e 76 69 73 69 62 6c 65 | 3d 66 61 6c 73 65 1c 77 |.visible|=false.w|
|00002bb0| 2e 75 70 64 61 74 65 42 | 75 74 74 6f 6e 2e 76 69 |.updateB|utton.vi|
|00002bc0| 73 69 62 6c 65 3d 66 61 | 6c 73 65 0c 45 6e 64 20 |sible=fa|lse.End |
|00002bd0| 46 75 6e 63 74 69 6f 6e | 00 00 0a 0f 04 56 69 65 |Function|.....Vie|
|00002be0| 77 0b 44 6f 63 74 6f 72 | 45 6e 74 72 79 04 90 02 |w.Doctor|Entry...|
|00002bf0| 8b 01 12 04 4e 61 6d 65 | 0b 44 6f 63 74 6f 72 45 |....Name|.DoctorE|
|00002c00| 6e 74 72 79 05 46 72 61 | 6d 65 01 30 0c 48 61 73 |ntry.Fra|me.0.Has|
|00002c10| 42 61 63 6b 43 6f 6c 6f | 72 05 46 61 6c 73 65 09 |BackColo|r.False.|
|00002c20| 42 61 63 6b 43 6f 6c 6f | 72 08 31 36 37 37 37 32 |BackColo|r.167772|
|00002c30| 31 35 08 42 61 63 6b 64 | 72 6f 70 01 30 05 54 69 |15.Backd|rop.0.Ti|
|00002c40| 74 6c 65 08 55 6e 74 69 | 74 6c 65 64 07 56 69 73 |tle.Unti|tled.Vis|
|00002c50| 69 62 6c 65 04 54 72 75 | 65 08 43 6c 6f 73 65 42 |ible.Tru|e.CloseB|
|00002c60| 6f 78 04 54 72 75 65 08 | 47 72 6f 77 49 63 6f 6e |ox.True.|GrowIcon|
|00002c70| 05 46 61 6c 73 65 08 5a | 6f 6f 6d 49 63 6f 6e 05 |.False.Z|oomIcon.|
|00002c80| 46 61 6c 73 65 0b 42 61 | 6c 6c 6f 6f 6e 48 65 6c |False.Ba|lloonHel|
|00002c90| 70 00 09 50 6c 61 63 65 | 6d 65 6e 74 01 30 05 57 |p..Place|ment.0.W|
|00002ca0| 69 64 74 68 03 33 36 30 | 06 48 65 69 67 68 74 03 |idth.360|.Height.|
|00002cb0| 31 35 34 08 4d 69 6e 57 | 69 64 74 68 02 36 34 09 |154.MinW|idth.64.|
|00002cc0| 4d 69 6e 48 65 69 67 68 | 74 02 36 34 08 4d 61 78 |MinHeigh|t.64.Max|
|00002cd0| 57 69 64 74 68 05 33 32 | 30 30 30 09 4d 61 78 48 |Width.32|000.MaxH|
|00002ce0| 65 69 67 68 74 05 33 32 | 30 30 30 07 00 0b 44 6f |eight.32|000...Do|
|00002cf0| 63 74 6f 72 45 6e 74 72 | 79 b4 01 06 44 69 61 6c |ctorEntr|y...Dial|
|00002d00| 6f 67 00 02 1b 73 65 6c | 65 63 74 69 6f 6e 20 61 |og...sel|ection a|
|00002d10| 73 20 44 61 74 61 62 61 | 73 65 43 75 72 73 6f 72 |s Databa|seCursor|
|00002d20| 00 0e 44 42 20 61 73 20 | 44 61 74 61 62 61 73 65 |..DB as |Database|
|00002d30| 00 02 10 44 65 6c 65 74 | 65 54 68 69 73 52 65 63 |...Delet|eThisRec|
|00002d40| 6f 72 64 00 00 00 03 16 | 03 00 06 16 53 75 62 20 |ord.....|....Sub |
|00002d50| 44 65 6c 65 74 65 54 68 | 69 73 52 65 63 6f 72 64 |DeleteTh|isRecord|
|00002d60| 28 29 16 73 65 6c 65 63 | 74 69 6f 6e 2e 64 65 6c |().selec|tion.del|
|00002d70| 65 74 65 52 65 63 6f 72 | 64 09 64 62 2e 63 6f 6d |eteRecor|d.db.com|
|00002d80| 6d 69 74 16 64 6f 63 74 | 6f 72 73 4c 69 73 74 2e |mit.doct|orsList.|
|00002d90| 75 70 64 61 74 65 4c 69 | 73 74 05 63 6c 6f 73 65 |updateLi|st.close|
|00002da0| 07 45 6e 64 20 53 75 62 | 0d 53 61 76 65 4e 65 77 |.End Sub|.SaveNew|
|00002db0| 52 65 63 6f 72 64 00 00 | 00 08 36 08 36 13 13 53 |Record..|..6.6..S|
|00002dc0| 75 62 20 53 61 76 65 4e | 65 77 52 65 63 6f 72 64 |ub SaveN|ewRecord|
|00002dd0| 28 29 19 44 69 6d 20 72 | 65 63 20 61 73 20 44 61 |().Dim r|ec as Da|
|00002de0| 74 61 62 61 73 65 52 65 | 63 6f 72 64 19 64 69 6d |tabaseRe|cord.dim|
|00002df0| 20 64 62 63 20 61 73 20 | 64 61 74 61 62 61 73 65 | dbc as |database|
|00002e00| 63 75 72 73 6f 72 00 18 | 72 65 63 20 3d 20 6e 65 |cursor..|rec = ne|
|00002e10| 77 20 44 61 74 61 62 61 | 73 65 52 65 63 6f 72 64 |w Databa|seRecord|
|00002e20| 00 2f 64 62 63 3d 64 62 | 2e 73 71 6c 73 65 6c 65 |./dbc=db|.sqlsele|
|00002e30| 63 74 28 22 73 65 6c 65 | 63 74 20 4d 41 58 28 49 |ct("sele|ct MAX(I|
|00002e40| 44 29 20 66 72 6f 6d 20 | 44 6f 63 74 6f 72 73 22 |D) from |Doctors"|
|00002e50| 29 00 36 72 65 63 2e 63 | 6f 6c 75 6d 6e 28 22 49 |).6rec.c|olumn("I|
|00002e60| 44 22 29 3d 73 74 72 28 | 76 61 6c 28 64 62 63 2e |D")=str(|val(dbc.|
|00002e70| 69 64 78 46 69 65 6c 64 | 28 31 29 2e 67 65 74 53 |idxField|(1).getS|
|00002e80| 74 72 69 6e 67 29 2b 31 | 29 1e 72 65 63 2e 63 6f |tring)+1|).rec.co|
|00002e90| 6c 75 6d 6e 28 22 46 69 | 72 73 74 22 29 3d 66 69 |lumn("Fi|rst")=fi|
|00002ea0| 72 73 74 2e 74 65 78 74 | 1c 72 65 63 2e 63 6f 6c |rst.text|.rec.col|
|00002eb0| 75 6d 6e 28 22 4c 61 73 | 74 22 29 3d 6c 61 73 74 |umn("Las|t")=last|
|00002ec0| 2e 74 65 78 74 26 72 65 | 63 2e 63 6f 6c 75 6d 6e |.text&re|c.column|
|00002ed0| 28 22 53 70 65 63 69 61 | 6c 74 79 22 29 3d 73 70 |("Specia|lty")=sp|
|00002ee0| 65 63 69 61 6c 74 79 2e | 74 65 78 74 22 72 65 63 |ecialty.|text"rec|
|00002ef0| 2e 63 6f 6c 75 6d 6e 28 | 22 41 64 64 72 65 73 73 |.column(|"Address|
|00002f00| 22 29 3d 61 64 64 72 65 | 73 73 2e 74 65 78 74 1c |")=addre|ss.text.|
|00002f10| 72 65 63 2e 63 6f 6c 75 | 6d 6e 28 22 43 69 74 79 |rec.colu|mn("City|
|00002f20| 22 29 3d 63 69 74 79 2e | 74 65 78 74 1e 72 65 63 |")=city.|text.rec|
|00002f30| 2e 63 6f 6c 75 6d 6e 28 | 22 53 74 61 74 65 22 29 |.column(|"State")|
|00002f40| 3d 73 74 61 74 65 2e 74 | 65 78 74 1a 72 65 63 2e |=state.t|ext.rec.|
|00002f50| 63 6f 6c 75 6d 6e 28 22 | 5a 69 70 22 29 3d 7a 69 |column("|Zip")=zi|
|00002f60| 70 2e 74 65 78 74 00 1d | 64 62 2e 49 6e 73 65 72 |p.text..|db.Inser|
|00002f70| 74 52 65 63 6f 72 64 20 | 22 44 6f 63 74 6f 72 73 |tRecord |"Doctors|
|00002f80| 22 2c 72 65 63 07 45 6e | 64 20 53 75 62 00 03 05 |",rec.En|d Sub...|
|00002f90| 43 6c 6f 73 65 02 2b 02 | 2b 09 0b 53 75 62 20 43 |Close.+.|+..Sub C|
|00002fa0| 6c 6f 73 65 28 29 14 64 | 69 6d 20 77 20 61 73 20 |lose().d|im w as |
|00002fb0| 43 6f 6e 66 69 72 6d 53 | 61 76 65 2b 69 66 20 6e |ConfirmS|ave+if n|
|00002fc0| 6f 74 20 65 64 69 74 62 | 75 74 74 6f 6e 2e 76 69 |ot editb|utton.vi|
|00002fd0| 73 69 62 6c 65 20 74 68 | 65 6e 20 2f 2f 6e 65 77 |sible th|en //new|
|00002fe0| 20 72 65 63 6f 72 64 04 | 62 65 65 70 13 77 20 3d | record.|beep.w =|
|00002ff0| 20 6e 65 77 20 43 6f 6e | 66 69 72 6d 53 61 76 65 | new Con|firmSave|
|00003000| 0d 77 2e 50 61 72 65 6e | 74 3d 73 65 6c 66 0b 77 |.w.Paren|t=self.w|
|00003010| 2e 73 68 6f 77 6d 6f 64 | 61 6c 06 65 6e 64 20 69 |.showmod|al.end i|
|00003020| 66 07 45 6e 64 20 53 75 | 62 0f 45 6e 61 62 6c 65 |f.End Su|b.Enable|
|00003030| 4d 65 6e 75 49 74 65 6d | 73 01 16 01 16 04 15 53 |MenuItem|s......S|
|00003040| 75 62 20 45 6e 61 62 6c | 65 4d 65 6e 75 49 74 65 |ub Enabl|eMenuIte|
|00003050| 6d 73 28 29 16 46 69 6c | 65 43 6c 6f 73 65 2e 65 |ms().Fil|eClose.e|
|00003060| 6e 61 62 6c 65 64 3d 74 | 72 75 65 1a 44 6f 63 74 |nabled=t|rue.Doct|
|00003070| 6f 72 73 44 65 6c 65 74 | 65 2e 65 6e 61 62 6c 65 |orsDelet|e.enable|
|00003080| 64 3d 74 72 75 65 07 45 | 6e 64 20 53 75 62 04 4f |d=true.E|nd Sub.O|
|00003090| 70 65 6e 01 00 01 00 03 | 0a 53 75 62 20 4f 70 65 |pen.....|.Sub Ope|
|000030a0| 6e 28 29 00 07 45 6e 64 | 20 53 75 62 02 09 46 69 |n()..End| Sub..Fi|
|000030b0| 6c 65 43 6c 6f 73 65 01 | 05 01 05 03 1a 46 75 6e |leClose.|.....Fun|
|000030c0| 63 74 69 6f 6e 20 41 63 | 74 69 6f 6e 20 41 73 20 |ction Ac|tion As |
|000030d0| 42 6f 6f 6c 65 61 6e 05 | 43 6c 6f 73 65 0c 45 6e |Boolean.|Close.En|
|000030e0| 64 20 46 75 6e 63 74 69 | 6f 6e 0d 44 6f 63 74 6f |d Functi|on.Docto|
|000030f0| 72 73 44 65 6c 65 74 65 | 01 00 05 0b 07 1a 46 75 |rsDelete|......Fu|
|00003100| 6e 63 74 69 6f 6e 20 41 | 63 74 69 6f 6e 20 41 73 |nction A|ction As|
|00003110| 20 42 6f 6f 6c 65 61 6e | 16 64 69 6d 20 77 20 61 | Boolean|.dim w a|
|00003120| 73 20 43 6f 6e 66 69 72 | 6d 44 65 6c 65 74 65 04 |s Confir|mDelete.|
|00003130| 62 65 65 70 15 77 20 3d | 20 6e 65 77 20 43 6f 6e |beep.w =| new Con|
|00003140| 66 69 72 6d 44 65 6c 65 | 74 65 0d 77 2e 50 61 72 |firmDele|te.w.Par|
|00003150| 65 6e 74 3d 73 65 6c 66 | 0b 77 2e 73 68 6f 77 6d |ent=self|.w.showm|
|00003160| 6f 64 61 6c 0c 45 6e 64 | 20 46 75 6e 63 74 69 6f |odal.End| Functio|
|00003170| 6e 00 10 07 00 00 b4 01 | 0a 50 75 73 68 42 75 74 |n.......|.PushBut|
|00003180| 74 6f 6e 00 00 00 00 01 | 06 41 63 74 69 6f 6e 06 |ton.....|.Action.|
|00003190| 16 06 16 08 0c 53 75 62 | 20 41 63 74 69 6f 6e 28 |.....Sub| Action(|
|000031a0| 29 20 75 70 64 61 74 65 | 43 75 72 72 65 6e 74 52 |) update|CurrentR|
|000031b0| 6f 77 20 73 65 6c 65 63 | 74 69 6f 6e 2c 20 73 65 |ow selec|tion, se|
|000031c0| 6c 66 09 64 62 2e 63 6f | 6d 6d 69 74 10 6d 65 2e |lf.db.co|mmit.me.|
|000031d0| 65 6e 61 62 6c 65 64 3d | 66 61 6c 73 65 17 65 64 |enabled=|false.ed|
|000031e0| 69 74 62 75 74 74 6f 6e | 2e 65 6e 61 62 6c 65 64 |itbutton|.enabled|
|000031f0| 3d 74 72 75 65 1e 52 65 | 63 6f 72 64 52 65 61 64 |=true.Re|cordRead|
|00003200| 4f 6e 6c 79 53 74 61 74 | 65 20 74 72 75 65 2c 20 |OnlyStat|e true, |
|00003210| 73 65 6c 66 16 64 6f 63 | 74 6f 72 73 4c 69 73 74 |self.doc|torsList|
|00003220| 2e 75 70 64 61 74 65 4c | 69 73 74 07 45 6e 64 20 |.updateL|ist.End |
|00003230| 53 75 62 00 00 07 00 00 | b4 01 0a 50 75 73 68 42 |Sub.....|...PushB|
|00003240| 75 74 74 6f 6e 00 00 00 | 00 01 06 41 63 74 69 6f |utton...|...Actio|
|00003250| 6e 07 10 07 10 0a 0c 53 | 75 62 20 41 63 74 69 6f |n......S|ub Actio|
|00003260| 6e 28 29 0e 73 65 6c 65 | 63 74 69 6f 6e 2e 65 64 |n().sele|ction.ed|
|00003270| 69 74 10 69 66 20 64 62 | 2e 65 72 72 6f 72 20 74 |it.if db|.error t|
|00003280| 68 65 6e 2c 6d 73 67 42 | 6f 78 20 73 74 72 28 64 |hen,msgB|ox str(d|
|00003290| 62 2e 65 72 72 6f 72 63 | 6f 64 65 29 2b 22 20 22 |b.errorc|ode)+" "|
|000032a0| 2b 64 62 2e 65 72 72 6f | 72 4d 65 73 73 61 67 65 |+db.erro|rMessage|
|000032b0| 06 65 6e 64 20 69 66 1d | 67 65 74 43 75 72 72 65 |.end if.|getCurre|
|000032c0| 6e 74 52 6f 77 20 73 65 | 6c 65 63 74 69 6f 6e 2c |ntRow se|lection,|
|000032d0| 20 73 65 6c 66 1f 52 65 | 63 6f 72 64 52 65 61 64 | self.Re|cordRead|
|000032e0| 4f 6e 6c 79 53 74 61 74 | 65 20 66 61 6c 73 65 2c |OnlyStat|e false,|
|000032f0| 20 73 65 6c 66 10 6d 65 | 2e 65 6e 61 62 6c 65 64 | self.me|.enabled|
|00003300| 3d 66 61 6c 73 65 19 75 | 70 64 61 74 65 42 75 74 |=false.u|pdateBut|
|00003310| 74 6f 6e 2e 65 6e 61 62 | 6c 65 64 3d 74 72 75 65 |ton.enab|led=true|
|00003320| 07 45 6e 64 20 53 75 62 | 00 00 07 00 00 88 02 07 |.End Sub|........|
|00003330| 64 62 66 69 65 6c 64 00 | 00 00 00 01 07 4b 65 79 |dbfield.|.....Key|
|00003340| 44 6f 77 6e 01 00 01 00 | 03 2a 46 75 6e 63 74 69 |Down....|.*Functi|
|00003350| 6f 6e 20 4b 65 79 44 6f | 77 6e 28 4b 65 79 20 41 |on KeyDo|wn(Key A|
|00003360| 73 20 53 74 72 69 6e 67 | 29 20 41 73 20 42 6f 6f |s String|) As Boo|
|00003370| 6c 65 61 6e 00 0c 45 6e | 64 20 46 75 6e 63 74 69 |lean..En|d Functi|
|00003380| 6f 6e 00 00 07 00 00 88 | 02 07 64 62 66 69 65 6c |on......|..dbfiel|
|00003390| 64 00 00 00 00 00 00 00 | 07 00 00 88 02 07 64 62 |d.......|......db|
|000033a0| 66 69 65 6c 64 00 00 00 | 00 00 00 00 07 00 00 88 |field...|........|
|000033b0| 02 07 64 62 66 69 65 6c | 64 00 00 00 00 00 00 00 |..dbfiel|d.......|
|000033c0| 07 00 00 88 02 07 64 62 | 66 69 65 6c 64 00 00 00 |......db|field...|
|000033d0| 00 00 00 00 07 00 00 88 | 02 07 64 62 66 69 65 6c |........|..dbfiel|
|000033e0| 64 00 00 00 00 00 00 00 | 07 00 00 88 02 07 64 62 |d.......|......db|
|000033f0| 66 69 65 6c 64 00 00 00 | 00 00 00 00 07 00 00 b4 |field...|........|
|00003400| 01 0a 53 74 61 74 69 63 | 54 65 78 74 00 00 00 00 |..Static|Text....|
|00003410| 00 00 00 07 00 00 b4 01 | 0a 53 74 61 74 69 63 54 |........|.StaticT|
|00003420| 65 78 74 00 00 00 00 00 | 00 00 07 00 00 b4 01 0a |ext.....|........|
|00003430| 53 74 61 74 69 63 54 65 | 78 74 00 00 00 00 00 00 |StaticTe|xt......|
|00003440| 00 07 00 00 b4 01 0a 53 | 74 61 74 69 63 54 65 78 |.......S|taticTex|
|00003450| 74 00 00 00 00 00 00 00 | 07 00 00 b4 01 0a 53 74 |t.......|......St|
|00003460| 61 74 69 63 54 65 78 74 | 00 00 00 00 00 00 00 07 |aticText|........|
|00003470| 00 00 b4 01 0a 53 74 61 | 74 69 63 54 65 78 74 00 |.....Sta|ticText.|
|00003480| 00 00 00 00 00 00 07 00 | 00 b4 01 0a 53 74 61 74 |........|....Stat|
|00003490| 69 63 54 65 78 74 00 00 | 00 00 00 00 00 10 0a 50 |icText..|.......P|
|000034a0| 75 73 68 42 75 74 74 6f | 6e 17 04 4e 61 6d 65 0c |ushButto|n..Name.|
|000034b0| 75 70 64 61 74 65 42 75 | 74 74 6f 6e 05 49 6e 64 |updateBu|tton.Ind|
|000034c0| 65 78 0b 2d 32 31 34 37 | 34 38 33 36 34 38 0d 54 |ex.-2147|483648.T|
|000034d0| 61 62 50 61 6e 65 6c 49 | 6e 64 65 78 01 30 07 56 |abPanelI|ndex.0.V|
|000034e0| 69 73 69 62 6c 65 04 54 | 72 75 65 04 4c 65 66 74 |isible.T|rue.Left|
|000034f0| 03 32 38 36 03 54 6f 70 | 03 31 31 39 05 57 69 64 |.286.Top|.119.Wid|
|00003500| 74 68 02 36 30 06 48 65 | 69 67 68 74 02 32 30 0b |th.60.He|ight.20.|
|00003510| 42 61 6c 6c 6f 6f 6e 48 | 65 6c 70 ae 01 41 6c 6c |BalloonH|elp..All|
|00003520| 6f 77 73 20 79 6f 75 20 | 74 6f 20 73 61 76 65 20 |ows you |to save |
|00003530| 74 68 65 20 63 68 61 6e | 67 65 73 20 79 6f 75 27 |the chan|ges you'|
|00003540| 76 65 20 6d 61 64 65 20 | 74 6f 20 74 68 65 20 72 |ve made |to the r|
|00003550| 65 63 6f 72 64 2e 20 44 | 69 73 61 62 6c 65 64 20 |ecord. D|isabled |
|00003560| 62 65 63 61 75 73 65 20 | 79 6f 75 20 61 72 65 20 |because |you are |
|00003570| 61 6c 72 65 61 64 79 20 | 65 64 69 74 69 6e 67 20 |already |editing |
|00003580| 74 68 65 20 72 65 63 6f | 72 64 2e 13 44 69 73 61 |the reco|rd..Disa|
|00003590| 62 6c 65 64 42 61 6c 6c | 6f 6f 6e 48 65 6c 70 b2 |bledBall|oonHelp.|
|000035a0| 02 41 6c 6c 6f 77 73 20 | 79 6f 75 20 74 6f 20 73 |.Allows |you to s|
|000035b0| 61 76 65 20 74 68 65 20 | 63 68 61 6e 67 65 73 20 |ave the |changes |
|000035c0| 79 6f 75 27 76 65 20 6d | 61 64 65 20 74 6f 20 74 |you've m|ade to t|
|000035d0| 68 65 20 72 65 63 6f 72 | 64 2e 20 44 69 73 61 62 |he recor|d. Disab|
|000035e0| 6c 65 64 20 62 65 63 61 | 75 73 65 20 74 68 65 20 |led beca|use the |
|000035f0| 72 65 63 6f 72 64 20 69 | 73 20 62 65 69 6e 67 20 |record i|s being |
|00003600| 65 64 69 74 65 64 20 62 | 79 20 61 6e 6f 74 68 65 |edited b|y anothe|
|00003610| 72 20 75 73 65 72 20 6f | 72 20 79 6f 75 20 68 61 |r user o|r you ha|
|00003620| 76 65 6e 27 74 20 63 6c | 69 63 6b 65 64 20 74 68 |ven't cl|icked th|
|00003630| 65 20 45 64 69 74 20 62 | 75 74 74 6f 6e 20 74 6f |e Edit b|utton to|
|00003640| 20 62 65 67 69 6e 6e 69 | 6e 67 20 65 64 69 74 69 | beginni|ng editi|
|00003650| 6e 67 2e 08 4c 6f 63 6b | 4c 65 66 74 05 46 61 6c |ng..Lock|Left.Fal|
|00003660| 73 65 07 4c 6f 63 6b 54 | 6f 70 05 46 61 6c 73 65 |se.LockT|op.False|
|00003670| 09 4c 6f 63 6b 52 69 67 | 68 74 05 46 61 6c 73 65 |.LockRig|ht.False|
|00003680| 0a 4c 6f 63 6b 42 6f 74 | 74 6f 6d 05 46 61 6c 73 |.LockBot|tom.Fals|
|00003690| 65 08 54 65 78 74 46 6f | 6e 74 08 43 68 61 72 63 |e.TextFo|nt.Charc|
|000036a0| 6f 61 6c 08 54 65 78 74 | 53 69 7a 65 02 31 32 04 |oal.Text|Size.12.|
|000036b0| 42 6f 6c 64 05 46 61 6c | 73 65 06 49 74 61 6c 69 |Bold.Fal|se.Itali|
|000036c0| 63 05 46 61 6c 73 65 09 | 55 6e 64 65 72 6c 69 6e |c.False.|Underlin|
|000036d0| 65 05 46 61 6c 73 65 07 | 43 61 70 74 69 6f 6e 06 |e.False.|Caption.|
|000036e0| 55 70 64 61 74 65 07 44 | 65 66 61 75 6c 74 05 46 |Update.D|efault.F|
|000036f0| 61 6c 73 65 06 43 61 6e | 63 65 6c 05 46 61 6c 73 |alse.Can|cel.Fals|
|00003700| 65 07 45 6e 61 62 6c 65 | 64 05 46 61 6c 73 65 00 |e.Enable|d.False.|
|00003710| 0a 50 75 73 68 42 75 74 | 74 6f 6e 17 04 4e 61 6d |.PushBut|ton..Nam|
|00003720| 65 0a 65 64 69 74 62 75 | 74 74 6f 6e 05 49 6e 64 |e.editbu|tton.Ind|
|00003730| 65 78 0b 2d 32 31 34 37 | 34 38 33 36 34 38 0d 54 |ex.-2147|483648.T|
|00003740| 61 62 50 61 6e 65 6c 49 | 6e 64 65 78 01 30 07 56 |abPanelI|ndex.0.V|
|00003750| 69 73 69 62 6c 65 04 54 | 72 75 65 04 4c 65 66 74 |isible.T|rue.Left|
|00003760| 03 32 31 33 03 54 6f 70 | 03 31 31 39 05 57 69 64 |.213.Top|.119.Wid|
|00003770| 74 68 02 36 30 06 48 65 | 69 67 68 74 02 32 30 0b |th.60.He|ight.20.|
|00003780| 42 61 6c 6c 6f 6f 6e 48 | 65 6c 70 29 41 6c 6c 6f |BalloonH|elp)Allo|
|00003790| 77 73 20 79 6f 75 20 74 | 6f 20 6d 61 6b 65 20 63 |ws you t|o make c|
|000037a0| 68 61 6e 67 65 73 20 74 | 6f 20 74 68 65 20 72 65 |hanges t|o the re|
|000037b0| 63 6f 72 64 2e 13 44 69 | 73 61 62 6c 65 64 42 61 |cord..Di|sabledBa|
|000037c0| 6c 6c 6f 6f 6e 48 65 6c | 70 9e 01 41 6c 6c 6f 77 |lloonHel|p..Allow|
|000037d0| 73 20 79 6f 75 20 74 6f | 20 6d 61 6b 65 20 63 68 |s you to| make ch|
|000037e0| 61 6e 67 65 73 20 74 6f | 20 74 68 65 20 72 65 63 |anges to| the rec|
|000037f0| 6f 72 64 2e 20 44 69 73 | 61 62 6c 65 64 20 62 65 |ord. Dis|abled be|
|00003800| 63 61 75 73 65 20 79 6f | 75 20 61 72 65 20 61 6c |cause yo|u are al|
|00003810| 72 65 61 64 79 20 65 64 | 69 74 69 6e 67 20 74 68 |ready ed|iting th|
|00003820| 65 20 72 65 63 6f 72 64 | 2e 08 4c 6f 63 6b 4c 65 |e record|..LockLe|
|00003830| 66 74 05 46 61 6c 73 65 | 07 4c 6f 63 6b 54 6f 70 |ft.False|.LockTop|
|00003840| 05 46 61 6c 73 65 09 4c | 6f 63 6b 52 69 67 68 74 |.False.L|ockRight|
|00003850| 05 46 61 6c 73 65 0a 4c | 6f 63 6b 42 6f 74 74 6f |.False.L|ockBotto|
|00003860| 6d 05 46 61 6c 73 65 08 | 54 65 78 74 46 6f 6e 74 |m.False.|TextFont|
|00003870| 08 43 68 61 72 63 6f 61 | 6c 08 54 65 78 74 53 69 |.Charcoa|l.TextSi|
|00003880| 7a 65 02 31 32 04 42 6f | 6c 64 05 46 61 6c 73 65 |ze.12.Bo|ld.False|
|00003890| 06 49 74 61 6c 69 63 05 | 46 61 6c 73 65 09 55 6e |.Italic.|False.Un|
|000038a0| 64 65 72 6c 69 6e 65 05 | 46 61 6c 73 65 07 43 61 |derline.|False.Ca|
|000038b0| 70 74 69 6f 6e 04 45 64 | 69 74 07 44 65 66 61 75 |ption.Ed|it.Defau|
|000038c0| 6c 74 05 46 61 6c 73 65 | 06 43 61 6e 63 65 6c 05 |lt.False|.Cancel.|
|000038d0| 46 61 6c 73 65 07 45 6e | 61 62 6c 65 64 04 54 72 |False.En|abled.Tr|
|000038e0| 75 65 01 09 45 64 69 74 | 46 69 65 6c 64 20 04 4e |ue..Edit|Field .N|
|000038f0| 61 6d 65 05 66 69 72 73 | 74 05 49 6e 64 65 78 0b |ame.firs|t.Index.|
|00003900| 2d 32 31 34 37 34 38 33 | 36 34 38 0d 54 61 62 50 |-2147483|648.TabP|
|00003910| 61 6e 65 6c 49 6e 64 65 | 78 01 30 07 56 69 73 69 |anelInde|x.0.Visi|
|00003920| 62 6c 65 04 54 72 75 65 | 04 4c 65 66 74 02 36 35 |ble.True|.Left.65|
|00003930| 03 54 6f 70 02 31 30 05 | 57 69 64 74 68 02 38 30 |.Top.10.|Width.80|
|00003940| 06 48 65 69 67 68 74 02 | 31 38 0b 42 61 6c 6c 6f |.Height.|18.Ballo|
|00003950| 6f 6e 48 65 6c 70 00 13 | 44 69 73 61 62 6c 65 64 |onHelp..|Disabled|
|00003960| 42 61 6c 6c 6f 6f 6e 48 | 65 6c 70 00 08 4c 6f 63 |BalloonH|elp..Loc|
|00003970| 6b 4c 65 66 74 05 46 61 | 6c 73 65 07 4c 6f 63 6b |kLeft.Fa|lse.Lock|
|00003980| 54 6f 70 05 46 61 6c 73 | 65 09 4c 6f 63 6b 52 69 |Top.Fals|e.LockRi|
|00003990| 67 68 74 05 46 61 6c 73 | 65 0a 4c 6f 63 6b 42 6f |ght.Fals|e.LockBo|
|000039a0| 74 74 6f 6d 05 46 61 6c | 73 65 08 54 65 78 74 46 |ttom.Fal|se.TextF|
|000039b0| 6f 6e 74 06 47 65 6e 65 | 76 61 08 54 65 78 74 53 |ont.Gene|va.TextS|
|000039c0| 69 7a 65 01 39 04 42 6f | 6c 64 05 46 61 6c 73 65 |ize.9.Bo|ld.False|
|000039d0| 06 49 74 61 6c 69 63 05 | 46 61 6c 73 65 09 55 6e |.Italic.|False.Un|
|000039e0| 64 65 72 6c 69 6e 65 05 | 46 61 6c 73 65 06 42 6f |derline.|False.Bo|
|000039f0| 72 64 65 72 04 54 72 75 | 65 09 4d 75 6c 74 69 4c |rder.Tru|e.MultiL|
|00003a00| 69 6e 65 05 46 61 6c 73 | 65 09 53 63 72 6f 6c 6c |ine.Fals|e.Scroll|
|00003a10| 42 61 72 04 54 72 75 65 | 06 53 74 79 6c 65 64 05 |Bar.True|.Styled.|
|00003a20| 46 61 6c 73 65 08 50 61 | 73 73 77 6f 72 64 05 46 |False.Pa|ssword.F|
|00003a30| 61 6c 73 65 0c 55 73 65 | 46 6f 63 75 73 52 69 6e |alse.Use|FocusRin|
|00003a40| 67 04 54 72 75 65 08 52 | 65 61 64 4f 6e 6c 79 04 |g.True.R|eadOnly.|
|00003a50| 54 72 75 65 09 4c 69 6d | 69 74 54 65 78 74 01 30 |True.Lim|itText.0|
|00003a60| 0a 41 63 63 65 70 74 54 | 61 62 73 05 46 61 6c 73 |.AcceptT|abs.Fals|
|00003a70| 65 09 54 65 78 74 43 6f | 6c 6f 72 01 30 09 42 61 |e.TextCo|lor.0.Ba|
|00003a80| 63 6b 43 6f 6c 6f 72 08 | 31 36 37 37 37 32 31 35 |ckColor.|16777215|
|00003a90| 07 45 6e 61 62 6c 65 64 | 04 54 72 75 65 04 54 65 |.Enabled|.True.Te|
|00003aa0| 78 74 00 02 09 45 64 69 | 74 46 69 65 6c 64 20 04 |xt...Edi|tField .|
|00003ab0| 4e 61 6d 65 04 6c 61 73 | 74 05 49 6e 64 65 78 0b |Name.las|t.Index.|
|00003ac0| 2d 32 31 34 37 34 38 33 | 36 34 38 0d 54 61 62 50 |-2147483|648.TabP|
|00003ad0| 61 6e 65 6c 49 6e 64 65 | 78 01 30 07 56 69 73 69 |anelInde|x.0.Visi|
|00003ae0| 62 6c 65 04 54 72 75 65 | 04 4c 65 66 74 03 32 30 |ble.True|.Left.20|
|00003af0| 35 03 54 6f 70 02 31 30 | 05 57 69 64 74 68 03 31 |5.Top.10|.Width.1|
|00003b00| 34 31 06 48 65 69 67 68 | 74 02 31 38 0b 42 61 6c |41.Heigh|t.18.Bal|
|00003b10| 6c 6f 6f 6e 48 65 6c 70 | 00 13 44 69 73 61 62 6c |loonHelp|..Disabl|
|00003b20| 65 64 42 61 6c 6c 6f 6f | 6e 48 65 6c 70 00 08 4c |edBalloo|nHelp..L|
|00003b30| 6f 63 6b 4c 65 66 74 05 | 46 61 6c 73 65 07 4c 6f |ockLeft.|False.Lo|
|00003b40| 63 6b 54 6f 70 05 46 61 | 6c 73 65 09 4c 6f 63 6b |ckTop.Fa|lse.Lock|
|00003b50| 52 69 67 68 74 05 46 61 | 6c 73 65 0a 4c 6f 63 6b |Right.Fa|lse.Lock|
|00003b60| 42 6f 74 74 6f 6d 05 46 | 61 6c 73 65 08 54 65 78 |Bottom.F|alse.Tex|
|00003b70| 74 46 6f 6e 74 06 47 65 | 6e 65 76 61 08 54 65 78 |tFont.Ge|neva.Tex|
|00003b80| 74 53 69 7a 65 01 39 04 | 42 6f 6c 64 05 46 61 6c |tSize.9.|Bold.Fal|
|00003b90| 73 65 06 49 74 61 6c 69 | 63 05 46 61 6c 73 65 09 |se.Itali|c.False.|
|00003ba0| 55 6e 64 65 72 6c 69 6e | 65 05 46 61 6c 73 65 06 |Underlin|e.False.|
|00003bb0| 42 6f 72 64 65 72 04 54 | 72 75 65 09 4d 75 6c 74 |Border.T|rue.Mult|
|00003bc0| 69 4c 69 6e 65 05 46 61 | 6c 73 65 09 53 63 72 6f |iLine.Fa|lse.Scro|
|00003bd0| 6c 6c 42 61 72 04 54 72 | 75 65 06 53 74 79 6c 65 |llBar.Tr|ue.Style|
|00003be0| 64 05 46 61 6c 73 65 08 | 50 61 73 73 77 6f 72 64 |d.False.|Password|
|00003bf0| 05 46 61 6c 73 65 0c 55 | 73 65 46 6f 63 75 73 52 |.False.U|seFocusR|
|00003c00| 69 6e 67 04 54 72 75 65 | 08 52 65 61 64 4f 6e 6c |ing.True|.ReadOnl|
|00003c10| 79 04 54 72 75 65 09 4c | 69 6d 69 74 54 65 78 74 |y.True.L|imitText|
|00003c20| 01 30 0a 41 63 63 65 70 | 74 54 61 62 73 05 46 61 |.0.Accep|tTabs.Fa|
|00003c30| 6c 73 65 09 54 65 78 74 | 43 6f 6c 6f 72 01 30 09 |lse.Text|Color.0.|
|00003c40| 42 61 63 6b 43 6f 6c 6f | 72 08 31 36 37 37 37 32 |BackColo|r.167772|
|00003c50| 31 35 07 45 6e 61 62 6c | 65 64 04 54 72 75 65 04 |15.Enabl|ed.True.|
|00003c60| 54 65 78 74 00 03 09 45 | 64 69 74 46 69 65 6c 64 |Text...E|ditField|
|00003c70| 20 04 4e 61 6d 65 09 73 | 70 65 63 69 61 6c 74 79 | .Name.s|pecialty|
|00003c80| 05 49 6e 64 65 78 0b 2d | 32 31 34 37 34 38 33 36 |.Index.-|21474836|
|00003c90| 34 38 0d 54 61 62 50 61 | 6e 65 6c 49 6e 64 65 78 |48.TabPa|nelIndex|
|00003ca0| 01 30 07 56 69 73 69 62 | 6c 65 04 54 72 75 65 04 |.0.Visib|le.True.|
|00003cb0| 4c 65 66 74 02 36 35 03 | 54 6f 70 02 33 35 05 57 |Left.65.|Top.35.W|
|00003cc0| 69 64 74 68 03 31 38 35 | 06 48 65 69 67 68 74 02 |idth.185|.Height.|
|00003cd0| 31 38 0b 42 61 6c 6c 6f | 6f 6e 48 65 6c 70 00 13 |18.Ballo|onHelp..|
|00003ce0| 44 69 73 61 62 6c 65 64 | 42 61 6c 6c 6f 6f 6e 48 |Disabled|BalloonH|
|00003cf0| 65 6c 70 00 08 4c 6f 63 | 6b 4c 65 66 74 05 46 61 |elp..Loc|kLeft.Fa|
|00003d00| 6c 73 65 07 4c 6f 63 6b | 54 6f 70 05 46 61 6c 73 |lse.Lock|Top.Fals|
|00003d10| 65 09 4c 6f 63 6b 52 69 | 67 68 74 05 46 61 6c 73 |e.LockRi|ght.Fals|
|00003d20| 65 0a 4c 6f 63 6b 42 6f | 74 74 6f 6d 05 46 61 6c |e.LockBo|ttom.Fal|
|00003d30| 73 65 08 54 65 78 74 46 | 6f 6e 74 06 47 65 6e 65 |se.TextF|ont.Gene|
|00003d40| 76 61 08 54 65 78 74 53 | 69 7a 65 01 39 04 42 6f |va.TextS|ize.9.Bo|
|00003d50| 6c 64 05 46 61 6c 73 65 | 06 49 74 61 6c 69 63 05 |ld.False|.Italic.|
|00003d60| 46 61 6c 73 65 09 55 6e | 64 65 72 6c 69 6e 65 05 |False.Un|derline.|
|00003d70| 46 61 6c 73 65 06 42 6f | 72 64 65 72 04 54 72 75 |False.Bo|rder.Tru|
|00003d80| 65 09 4d 75 6c 74 69 4c | 69 6e 65 05 46 61 6c 73 |e.MultiL|ine.Fals|
|00003d90| 65 09 53 63 72 6f 6c 6c | 42 61 72 04 54 72 75 65 |e.Scroll|Bar.True|
|00003da0| 06 53 74 79 6c 65 64 05 | 46 61 6c 73 65 08 50 61 |.Styled.|False.Pa|
|00003db0| 73 73 77 6f 72 64 05 46 | 61 6c 73 65 0c 55 73 65 |ssword.F|alse.Use|
|00003dc0| 46 6f 63 75 73 52 69 6e | 67 04 54 72 75 65 08 52 |FocusRin|g.True.R|
|00003dd0| 65 61 64 4f 6e 6c 79 04 | 54 72 75 65 09 4c 69 6d |eadOnly.|True.Lim|
|00003de0| 69 74 54 65 78 74 01 30 | 0a 41 63 63 65 70 74 54 |itText.0|.AcceptT|
|00003df0| 61 62 73 05 46 61 6c 73 | 65 09 54 65 78 74 43 6f |abs.Fals|e.TextCo|
|00003e00| 6c 6f 72 01 30 09 42 61 | 63 6b 43 6f 6c 6f 72 08 |lor.0.Ba|ckColor.|
|00003e10| 31 36 37 37 37 32 31 35 | 07 45 6e 61 62 6c 65 64 |16777215|.Enabled|
|00003e20| 04 54 72 75 65 04 54 65 | 78 74 00 04 09 45 64 69 |.True.Te|xt...Edi|
|00003e30| 74 46 69 65 6c 64 20 04 | 4e 61 6d 65 07 61 64 64 |tField .|Name.add|
|00003e40| 72 65 73 73 05 49 6e 64 | 65 78 0b 2d 32 31 34 37 |ress.Ind|ex.-2147|
|00003e50| 34 38 33 36 34 38 0d 54 | 61 62 50 61 6e 65 6c 49 |483648.T|abPanelI|
|00003e60| 6e 64 65 78 01 30 07 56 | 69 73 69 62 6c 65 04 54 |ndex.0.V|isible.T|
|00003e70| 72 75 65 04 4c 65 66 74 | 02 36 35 03 54 6f 70 02 |rue.Left|.65.Top.|
|00003e80| 35 38 05 57 69 64 74 68 | 03 31 38 35 06 48 65 69 |58.Width|.185.Hei|
|00003e90| 67 68 74 02 31 38 0b 42 | 61 6c 6c 6f 6f 6e 48 65 |ght.18.B|alloonHe|
|00003ea0| 6c 70 00 13 44 69 73 61 | 62 6c 65 64 42 61 6c 6c |lp..Disa|bledBall|
|00003eb0| 6f 6f 6e 48 65 6c 70 00 | 08 4c 6f 63 6b 4c 65 66 |oonHelp.|.LockLef|
|00003ec0| 74 05 46 61 6c 73 65 07 | 4c 6f 63 6b 54 6f 70 05 |t.False.|LockTop.|
|00003ed0| 46 61 6c 73 65 09 4c 6f | 63 6b 52 69 67 68 74 05 |False.Lo|ckRight.|
|00003ee0| 46 61 6c 73 65 0a 4c 6f | 63 6b 42 6f 74 74 6f 6d |False.Lo|ckBottom|
|00003ef0| 05 46 61 6c 73 65 08 54 | 65 78 74 46 6f 6e 74 06 |.False.T|extFont.|
|00003f00| 47 65 6e 65 76 61 08 54 | 65 78 74 53 69 7a 65 01 |Geneva.T|extSize.|
|00003f10| 39 04 42 6f 6c 64 05 46 | 61 6c 73 65 06 49 74 61 |9.Bold.F|alse.Ita|
|00003f20| 6c 69 63 05 46 61 6c 73 | 65 09 55 6e 64 65 72 6c |lic.Fals|e.Underl|
|00003f30| 69 6e 65 05 46 61 6c 73 | 65 06 42 6f 72 64 65 72 |ine.Fals|e.Border|
|00003f40| 04 54 72 75 65 09 4d 75 | 6c 74 69 4c 69 6e 65 05 |.True.Mu|ltiLine.|
|00003f50| 46 61 6c 73 65 09 53 63 | 72 6f 6c 6c 42 61 72 04 |False.Sc|rollBar.|
|00003f60| 54 72 75 65 06 53 74 79 | 6c 65 64 05 46 61 6c 73 |True.Sty|led.Fals|
|00003f70| 65 08 50 61 73 73 77 6f | 72 64 05 46 61 6c 73 65 |e.Passwo|rd.False|
|00003f80| 0c 55 73 65 46 6f 63 75 | 73 52 69 6e 67 04 54 72 |.UseFocu|sRing.Tr|
|00003f90| 75 65 08 52 65 61 64 4f | 6e 6c 79 04 54 72 75 65 |ue.ReadO|nly.True|
|00003fa0| 09 4c 69 6d 69 74 54 65 | 78 74 01 30 0a 41 63 63 |.LimitTe|xt.0.Acc|
|00003fb0| 65 70 74 54 61 62 73 05 | 46 61 6c 73 65 09 54 65 |eptTabs.|False.Te|
|00003fc0| 78 74 43 6f 6c 6f 72 01 | 30 09 42 61 63 6b 43 6f |xtColor.|0.BackCo|
|00003fd0| 6c 6f 72 08 31 36 37 37 | 37 32 31 35 07 45 6e 61 |lor.1677|7215.Ena|
|00003fe0| 62 6c 65 64 04 54 72 75 | 65 04 54 65 78 74 00 05 |bled.Tru|e.Text..|
|00003ff0| 09 45 64 69 74 46 69 65 | 6c 64 20 04 4e 61 6d 65 |.EditFie|ld .Name|
|00004000| 04 63 69 74 79 05 49 6e | 64 65 78 0b 2d 32 31 34 |.city.In|dex.-214|
|00004010| 37 34 38 33 36 34 38 0d | 54 61 62 50 61 6e 65 6c |7483648.|TabPanel|
|00004020| 49 6e 64 65 78 01 30 07 | 56 69 73 69 62 6c 65 04 |Index.0.|Visible.|
|00004030| 54 72 75 65 04 4c 65 66 | 74 02 36 35 03 54 6f 70 |True.Lef|t.65.Top|
|00004040| 02 38 31 05 57 69 64 74 | 68 03 31 30 30 06 48 65 |.81.Widt|h.100.He|
|00004050| 69 67 68 74 02 31 38 0b | 42 61 6c 6c 6f 6f 6e 48 |ight.18.|BalloonH|
|00004060| 65 6c 70 00 13 44 69 73 | 61 62 6c 65 64 42 61 6c |elp..Dis|abledBal|
|00004070| 6c 6f 6f 6e 48 65 6c 70 | 00 08 4c 6f 63 6b 4c 65 |loonHelp|..LockLe|
|00004080| 66 74 05 46 61 6c 73 65 | 07 4c 6f 63 6b 54 6f 70 |ft.False|.LockTop|
|00004090| 05 46 61 6c 73 65 09 4c | 6f 63 6b 52 69 67 68 74 |.False.L|ockRight|
|000040a0| 05 46 61 6c 73 65 0a 4c | 6f 63 6b 42 6f 74 74 6f |.False.L|ockBotto|
|000040b0| 6d 05 46 61 6c 73 65 08 | 54 65 78 74 46 6f 6e 74 |m.False.|TextFont|
|000040c0| 06 47 65 6e 65 76 61 08 | 54 65 78 74 53 69 7a 65 |.Geneva.|TextSize|
|000040d0| 01 39 04 42 6f 6c 64 05 | 46 61 6c 73 65 06 49 74 |.9.Bold.|False.It|
|000040e0| 61 6c 69 63 05 46 61 6c | 73 65 09 55 6e 64 65 72 |alic.Fal|se.Under|
|000040f0| 6c 69 6e 65 05 46 61 6c | 73 65 06 42 6f 72 64 65 |line.Fal|se.Borde|
|00004100| 72 04 54 72 75 65 09 4d | 75 6c 74 69 4c 69 6e 65 |r.True.M|ultiLine|
|00004110| 05 46 61 6c 73 65 09 53 | 63 72 6f 6c 6c 42 61 72 |.False.S|crollBar|
|00004120| 04 54 72 75 65 06 53 74 | 79 6c 65 64 05 46 61 6c |.True.St|yled.Fal|
|00004130| 73 65 08 50 61 73 73 77 | 6f 72 64 05 46 61 6c 73 |se.Passw|ord.Fals|
|00004140| 65 0c 55 73 65 46 6f 63 | 75 73 52 69 6e 67 04 54 |e.UseFoc|usRing.T|
|00004150| 72 75 65 08 52 65 61 64 | 4f 6e 6c 79 04 54 72 75 |rue.Read|Only.Tru|
|00004160| 65 09 4c 69 6d 69 74 54 | 65 78 74 01 30 0a 41 63 |e.LimitT|ext.0.Ac|
|00004170| 63 65 70 74 54 61 62 73 | 05 46 61 6c 73 65 09 54 |ceptTabs|.False.T|
|00004180| 65 78 74 43 6f 6c 6f 72 | 01 30 09 42 61 63 6b 43 |extColor|.0.BackC|
|00004190| 6f 6c 6f 72 08 31 36 37 | 37 37 32 31 35 07 45 6e |olor.167|77215.En|
|000041a0| 61 62 6c 65 64 04 54 72 | 75 65 04 54 65 78 74 00 |abled.Tr|ue.Text.|
|000041b0| 06 09 45 64 69 74 46 69 | 65 6c 64 20 04 4e 61 6d |..EditFi|eld .Nam|
|000041c0| 65 05 73 74 61 74 65 05 | 49 6e 64 65 78 0b 2d 32 |e.state.|Index.-2|
|000041d0| 31 34 37 34 38 33 36 34 | 38 0d 54 61 62 50 61 6e |14748364|8.TabPan|
|000041e0| 65 6c 49 6e 64 65 78 01 | 30 07 56 69 73 69 62 6c |elIndex.|0.Visibl|
|000041f0| 65 04 54 72 75 65 04 4c | 65 66 74 03 32 30 35 03 |e.True.L|eft.205.|
|00004200| 54 6f 70 02 38 31 05 57 | 69 64 74 68 02 34 35 06 |Top.81.W|idth.45.|
|00004210| 48 65 69 67 68 74 02 31 | 38 0b 42 61 6c 6c 6f 6f |Height.1|8.Balloo|
|00004220| 6e 48 65 6c 70 00 13 44 | 69 73 61 62 6c 65 64 42 |nHelp..D|isabledB|
|00004230| 61 6c 6c 6f 6f 6e 48 65 | 6c 70 00 08 4c 6f 63 6b |alloonHe|lp..Lock|
|00004240| 4c 65 66 74 05 46 61 6c | 73 65 07 4c 6f 63 6b 54 |Left.Fal|se.LockT|
|00004250| 6f 70 05 46 61 6c 73 65 | 09 4c 6f 63 6b 52 69 67 |op.False|.LockRig|
|00004260| 68 74 05 46 61 6c 73 65 | 0a 4c 6f 63 6b 42 6f 74 |ht.False|.LockBot|
|00004270| 74 6f 6d 05 46 61 6c 73 | 65 08 54 65 78 74 46 6f |tom.Fals|e.TextFo|
|00004280| 6e 74 06 47 65 6e 65 76 | 61 08 54 65 78 74 53 69 |nt.Genev|a.TextSi|
|00004290| 7a 65 01 39 04 42 6f 6c | 64 05 46 61 6c 73 65 06 |ze.9.Bol|d.False.|
|000042a0| 49 74 61 6c 69 63 05 46 | 61 6c 73 65 09 55 6e 64 |Italic.F|alse.Und|
|000042b0| 65 72 6c 69 6e 65 05 46 | 61 6c 73 65 06 42 6f 72 |erline.F|alse.Bor|
|000042c0| 64 65 72 04 54 72 75 65 | 09 4d 75 6c 74 69 4c 69 |der.True|.MultiLi|
|000042d0| 6e 65 05 46 61 6c 73 65 | 09 53 63 72 6f 6c 6c 42 |ne.False|.ScrollB|
|000042e0| 61 72 04 54 72 75 65 06 | 53 74 79 6c 65 64 05 46 |ar.True.|Styled.F|
|000042f0| 61 6c 73 65 08 50 61 73 | 73 77 6f 72 64 05 46 61 |alse.Pas|sword.Fa|
|00004300| 6c 73 65 0c 55 73 65 46 | 6f 63 75 73 52 69 6e 67 |lse.UseF|ocusRing|
|00004310| 04 54 72 75 65 08 52 65 | 61 64 4f 6e 6c 79 04 54 |.True.Re|adOnly.T|
|00004320| 72 75 65 09 4c 69 6d 69 | 74 54 65 78 74 01 30 0a |rue.Limi|tText.0.|
|00004330| 41 63 63 65 70 74 54 61 | 62 73 05 46 61 6c 73 65 |AcceptTa|bs.False|
|00004340| 09 54 65 78 74 43 6f 6c | 6f 72 01 30 09 42 61 63 |.TextCol|or.0.Bac|
|00004350| 6b 43 6f 6c 6f 72 08 31 | 36 37 37 37 32 31 35 07 |kColor.1|6777215.|
|00004360| 45 6e 61 62 6c 65 64 04 | 54 72 75 65 04 54 65 78 |Enabled.|True.Tex|
|00004370| 74 00 07 09 45 64 69 74 | 46 69 65 6c 64 20 04 4e |t...Edit|Field .N|
|00004380| 61 6d 65 03 7a 69 70 05 | 49 6e 64 65 78 0b 2d 32 |ame.zip.|Index.-2|
|00004390| 31 34 37 34 38 33 36 34 | 38 0d 54 61 62 50 61 6e |14748364|8.TabPan|
|000043a0| 65 6c 49 6e 64 65 78 01 | 30 07 56 69 73 69 62 6c |elIndex.|0.Visibl|
|000043b0| 65 04 54 72 75 65 04 4c | 65 66 74 03 32 38 35 03 |e.True.L|eft.285.|
|000043c0| 54 6f 70 02 38 31 05 57 | 69 64 74 68 02 36 31 06 |Top.81.W|idth.61.|
|000043d0| 48 65 69 67 68 74 02 31 | 38 0b 42 61 6c 6c 6f 6f |Height.1|8.Balloo|
|000043e0| 6e 48 65 6c 70 00 13 44 | 69 73 61 62 6c 65 64 42 |nHelp..D|isabledB|
|000043f0| 61 6c 6c 6f 6f 6e 48 65 | 6c 70 00 08 4c 6f 63 6b |alloonHe|lp..Lock|
|00004400| 4c 65 66 74 05 46 61 6c | 73 65 07 4c 6f 63 6b 54 |Left.Fal|se.LockT|
|00004410| 6f 70 05 46 61 6c 73 65 | 09 4c 6f 63 6b 52 69 67 |op.False|.LockRig|
|00004420| 68 74 05 46 61 6c 73 65 | 0a 4c 6f 63 6b 42 6f 74 |ht.False|.LockBot|
|00004430| 74 6f 6d 05 46 61 6c 73 | 65 08 54 65 78 74 46 6f |tom.Fals|e.TextFo|
|00004440| 6e 74 06 47 65 6e 65 76 | 61 08 54 65 78 74 53 69 |nt.Genev|a.TextSi|
|00004450| 7a 65 01 39 04 42 6f 6c | 64 05 46 61 6c 73 65 06 |ze.9.Bol|d.False.|
|00004460| 49 74 61 6c 69 63 05 46 | 61 6c 73 65 09 55 6e 64 |Italic.F|alse.Und|
|00004470| 65 72 6c 69 6e 65 05 46 | 61 6c 73 65 06 42 6f 72 |erline.F|alse.Bor|
|00004480| 64 65 72 04 54 72 75 65 | 09 4d 75 6c 74 69 4c 69 |der.True|.MultiLi|
|00004490| 6e 65 05 46 61 6c 73 65 | 09 53 63 72 6f 6c 6c 42 |ne.False|.ScrollB|
|000044a0| 61 72 04 54 72 75 65 06 | 53 74 79 6c 65 64 05 46 |ar.True.|Styled.F|
|000044b0| 61 6c 73 65 08 50 61 73 | 73 77 6f 72 64 05 46 61 |alse.Pas|sword.Fa|
|000044c0| 6c 73 65 0c 55 73 65 46 | 6f 63 75 73 52 69 6e 67 |lse.UseF|ocusRing|
|000044d0| 04 54 72 75 65 08 52 65 | 61 64 4f 6e 6c 79 04 54 |.True.Re|adOnly.T|
|000044e0| 72 75 65 09 4c 69 6d 69 | 74 54 65 78 74 01 30 0a |rue.Limi|tText.0.|
|000044f0| 41 63 63 65 70 74 54 61 | 62 73 05 46 61 6c 73 65 |AcceptTa|bs.False|
|00004500| 09 54 65 78 74 43 6f 6c | 6f 72 01 30 09 42 61 63 |.TextCol|or.0.Bac|
|00004510| 6b 43 6f 6c 6f 72 08 31 | 36 37 37 37 32 31 35 07 |kColor.1|6777215.|
|00004520| 45 6e 61 62 6c 65 64 04 | 54 72 75 65 04 54 65 78 |Enabled.|True.Tex|
|00004530| 74 00 08 0a 53 74 61 74 | 69 63 54 65 78 74 17 04 |t...Stat|icText..|
|00004540| 4e 61 6d 65 0b 53 74 61 | 74 69 63 54 65 78 74 31 |Name.Sta|ticText1|
|00004550| 05 49 6e 64 65 78 0b 2d | 32 31 34 37 34 38 33 36 |.Index.-|21474836|
|00004560| 34 38 0d 54 61 62 50 61 | 6e 65 6c 49 6e 64 65 78 |48.TabPa|nelIndex|
|00004570| 01 30 07 56 69 73 69 62 | 6c 65 04 54 72 75 65 04 |.0.Visib|le.True.|
|00004580| 4c 65 66 74 02 31 33 03 | 54 6f 70 02 31 33 05 57 |Left.13.|Top.13.W|
|00004590| 69 64 74 68 02 33 30 06 | 48 65 69 67 68 74 02 31 |idth.30.|Height.1|
|000045a0| 32 0b 42 61 6c 6c 6f 6f | 6e 48 65 6c 70 00 13 44 |2.Balloo|nHelp..D|
|000045b0| 69 73 61 62 6c 65 64 42 | 61 6c 6c 6f 6f 6e 48 65 |isabledB|alloonHe|
|000045c0| 6c 70 00 08 4c 6f 63 6b | 4c 65 66 74 05 46 61 6c |lp..Lock|Left.Fal|
|000045d0| 73 65 07 4c 6f 63 6b 54 | 6f 70 05 46 61 6c 73 65 |se.LockT|op.False|
|000045e0| 09 4c 6f 63 6b 52 69 67 | 68 74 05 46 61 6c 73 65 |.LockRig|ht.False|
|000045f0| 0a 4c 6f 63 6b 42 6f 74 | 74 6f 6d 05 46 61 6c 73 |.LockBot|tom.Fals|
|00004600| 65 08 54 65 78 74 46 6f | 6e 74 06 47 65 6e 65 76 |e.TextFo|nt.Genev|
|00004610| 61 08 54 65 78 74 53 69 | 7a 65 01 39 04 42 6f 6c |a.TextSi|ze.9.Bol|
|00004620| 64 05 46 61 6c 73 65 06 | 49 74 61 6c 69 63 05 46 |d.False.|Italic.F|
|00004630| 61 6c 73 65 09 55 6e 64 | 65 72 6c 69 6e 65 05 46 |alse.Und|erline.F|
|00004640| 61 6c 73 65 04 54 65 78 | 74 06 46 69 72 73 74 3a |alse.Tex|t.First:|
|00004650| 09 54 65 78 74 41 6c 69 | 67 6e 01 30 09 54 65 78 |.TextAli|gn.0.Tex|
|00004660| 74 43 6f 6c 6f 72 01 30 | 09 4d 75 6c 74 69 4c 69 |tColor.0|.MultiLi|
|00004670| 6e 65 05 46 61 6c 73 65 | 09 0a 53 74 61 74 69 63 |ne.False|..Static|
|00004680| 54 65 78 74 17 04 4e 61 | 6d 65 0b 53 74 61 74 69 |Text..Na|me.Stati|
|00004690| 63 54 65 78 74 32 05 49 | 6e 64 65 78 0b 2d 32 31 |cText2.I|ndex.-21|
|000046a0| 34 37 34 38 33 36 34 38 | 0d 54 61 62 50 61 6e 65 |47483648|.TabPane|
|000046b0| 6c 49 6e 64 65 78 01 30 | 07 56 69 73 69 62 6c 65 |lIndex.0|.Visible|
|000046c0| 04 54 72 75 65 04 4c 65 | 66 74 03 31 37 36 03 54 |.True.Le|ft.176.T|
|000046d0| 6f 70 02 31 33 05 57 69 | 64 74 68 02 32 35 06 48 |op.13.Wi|dth.25.H|
|000046e0| 65 69 67 68 74 02 31 32 | 0b 42 61 6c 6c 6f 6f 6e |eight.12|.Balloon|
|000046f0| 48 65 6c 70 00 13 44 69 | 73 61 62 6c 65 64 42 61 |Help..Di|sabledBa|
|00004700| 6c 6c 6f 6f 6e 48 65 6c | 70 00 08 4c 6f 63 6b 4c |lloonHel|p..LockL|
|00004710| 65 66 74 05 46 61 6c 73 | 65 07 4c 6f 63 6b 54 6f |eft.Fals|e.LockTo|
|00004720| 70 05 46 61 6c 73 65 09 | 4c 6f 63 6b 52 69 67 68 |p.False.|LockRigh|
|00004730| 74 05 46 61 6c 73 65 0a | 4c 6f 63 6b 42 6f 74 74 |t.False.|LockBott|
|00004740| 6f 6d 05 46 61 6c 73 65 | 08 54 65 78 74 46 6f 6e |om.False|.TextFon|
|00004750| 74 06 47 65 6e 65 76 61 | 08 54 65 78 74 53 69 7a |t.Geneva|.TextSiz|
|00004760| 65 01 39 04 42 6f 6c 64 | 05 46 61 6c 73 65 06 49 |e.9.Bold|.False.I|
|00004770| 74 61 6c 69 63 05 46 61 | 6c 73 65 09 55 6e 64 65 |talic.Fa|lse.Unde|
|00004780| 72 6c 69 6e 65 05 46 61 | 6c 73 65 04 54 65 78 74 |rline.Fa|lse.Text|
|00004790| 05 4c 61 73 74 3a 09 54 | 65 78 74 41 6c 69 67 6e |.Last:.T|extAlign|
|000047a0| 01 30 09 54 65 78 74 43 | 6f 6c 6f 72 01 30 09 4d |.0.TextC|olor.0.M|
|000047b0| 75 6c 74 69 4c 69 6e 65 | 05 46 61 6c 73 65 0a 0a |ultiLine|.False..|
|000047c0| 53 74 61 74 69 63 54 65 | 78 74 17 04 4e 61 6d 65 |StaticTe|xt..Name|
|000047d0| 0b 53 74 61 74 69 63 54 | 65 78 74 33 05 49 6e 64 |.StaticT|ext3.Ind|
|000047e0| 65 78 0b 2d 32 31 34 37 | 34 38 33 36 34 38 0d 54 |ex.-2147|483648.T|
|000047f0| 61 62 50 61 6e 65 6c 49 | 6e 64 65 78 01 30 07 56 |abPanelI|ndex.0.V|
|00004800| 69 73 69 62 6c 65 04 54 | 72 75 65 04 4c 65 66 74 |isible.T|rue.Left|
|00004810| 02 31 33 03 54 6f 70 02 | 33 38 05 57 69 64 74 68 |.13.Top.|38.Width|
|00004820| 02 35 30 06 48 65 69 67 | 68 74 02 31 32 0b 42 61 |.50.Heig|ht.12.Ba|
|00004830| 6c 6c 6f 6f 6e 48 65 6c | 70 00 13 44 69 73 61 62 |lloonHel|p..Disab|
|00004840| 6c 65 64 42 61 6c 6c 6f | 6f 6e 48 65 6c 70 00 08 |ledBallo|onHelp..|
|00004850| 4c 6f 63 6b 4c 65 66 74 | 05 46 61 6c 73 65 07 4c |LockLeft|.False.L|
|00004860| 6f 63 6b 54 6f 70 05 46 | 61 6c 73 65 09 4c 6f 63 |ockTop.F|alse.Loc|
|00004870| 6b 52 69 67 68 74 05 46 | 61 6c 73 65 0a 4c 6f 63 |kRight.F|alse.Loc|
|00004880| 6b 42 6f 74 74 6f 6d 05 | 46 61 6c 73 65 08 54 65 |kBottom.|False.Te|
|00004890| 78 74 46 6f 6e 74 06 47 | 65 6e 65 76 61 08 54 65 |xtFont.G|eneva.Te|
|000048a0| 78 74 53 69 7a 65 01 39 | 04 42 6f 6c 64 05 46 61 |xtSize.9|.Bold.Fa|
|000048b0| 6c 73 65 06 49 74 61 6c | 69 63 05 46 61 6c 73 65 |lse.Ital|ic.False|
|000048c0| 09 55 6e 64 65 72 6c 69 | 6e 65 05 46 61 6c 73 65 |.Underli|ne.False|
|000048d0| 04 54 65 78 74 0a 53 70 | 65 63 69 61 6c 74 79 3a |.Text.Sp|ecialty:|
|000048e0| 09 54 65 78 74 41 6c 69 | 67 6e 01 30 09 54 65 78 |.TextAli|gn.0.Tex|
|000048f0| 74 43 6f 6c 6f 72 01 30 | 09 4d 75 6c 74 69 4c 69 |tColor.0|.MultiLi|
|00004900| 6e 65 05 46 61 6c 73 65 | 0b 0a 53 74 61 74 69 63 |ne.False|..Static|
|00004910| 54 65 78 74 17 04 4e 61 | 6d 65 0b 53 74 61 74 69 |Text..Na|me.Stati|
|00004920| 63 54 65 78 74 34 05 49 | 6e 64 65 78 0b 2d 32 31 |cText4.I|ndex.-21|
|00004930| 34 37 34 38 33 36 34 38 | 0d 54 61 62 50 61 6e 65 |47483648|.TabPane|
|00004940| 6c 49 6e 64 65 78 01 30 | 07 56 69 73 69 62 6c 65 |lIndex.0|.Visible|
|00004950| 04 54 72 75 65 04 4c 65 | 66 74 02 31 33 03 54 6f |.True.Le|ft.13.To|
|00004960| 70 02 36 31 05 57 69 64 | 74 68 02 35 30 06 48 65 |p.61.Wid|th.50.He|
|00004970| 69 67 68 74 02 31 32 0b | 42 61 6c 6c 6f 6f 6e 48 |ight.12.|BalloonH|
|00004980| 65 6c 70 00 13 44 69 73 | 61 62 6c 65 64 42 61 6c |elp..Dis|abledBal|
|00004990| 6c 6f 6f 6e 48 65 6c 70 | 00 08 4c 6f 63 6b 4c 65 |loonHelp|..LockLe|
|000049a0| 66 74 05 46 61 6c 73 65 | 07 4c 6f 63 6b 54 6f 70 |ft.False|.LockTop|
|000049b0| 05 46 61 6c 73 65 09 4c | 6f 63 6b 52 69 67 68 74 |.False.L|ockRight|
|000049c0| 05 46 61 6c 73 65 0a 4c | 6f 63 6b 42 6f 74 74 6f |.False.L|ockBotto|
|000049d0| 6d 05 46 61 6c 73 65 08 | 54 65 78 74 46 6f 6e 74 |m.False.|TextFont|
|000049e0| 06 47 65 6e 65 76 61 08 | 54 65 78 74 53 69 7a 65 |.Geneva.|TextSize|
|000049f0| 01 39 04 42 6f 6c 64 05 | 46 61 6c 73 65 06 49 74 |.9.Bold.|False.It|
|00004a00| 61 6c 69 63 05 46 61 6c | 73 65 09 55 6e 64 65 72 |alic.Fal|se.Under|
|00004a10| 6c 69 6e 65 05 46 61 6c | 73 65 04 54 65 78 74 08 |line.Fal|se.Text.|
|00004a20| 41 64 64 72 65 73 73 3a | 09 54 65 78 74 41 6c 69 |Address:|.TextAli|
|00004a30| 67 6e 01 30 09 54 65 78 | 74 43 6f 6c 6f 72 01 30 |gn.0.Tex|tColor.0|
|00004a40| 09 4d 75 6c 74 69 4c 69 | 6e 65 05 46 61 6c 73 65 |.MultiLi|ne.False|
|00004a50| 0c 0a 53 74 61 74 69 63 | 54 65 78 74 17 04 4e 61 |..Static|Text..Na|
|00004a60| 6d 65 0b 53 74 61 74 69 | 63 54 65 78 74 35 05 49 |me.Stati|cText5.I|
|00004a70| 6e 64 65 78 0b 2d 32 31 | 34 37 34 38 33 36 34 38 |ndex.-21|47483648|
|00004a80| 0d 54 61 62 50 61 6e 65 | 6c 49 6e 64 65 78 01 30 |.TabPane|lIndex.0|
|00004a90| 07 56 69 73 69 62 6c 65 | 04 54 72 75 65 04 4c 65 |.Visible|.True.Le|
|00004aa0| 66 74 02 31 33 03 54 6f | 70 02 38 34 05 57 69 64 |ft.13.To|p.84.Wid|
|00004ab0| 74 68 02 33 37 06 48 65 | 69 67 68 74 02 31 32 0b |th.37.He|ight.12.|
|00004ac0| 42 61 6c 6c 6f 6f 6e 48 | 65 6c 70 00 13 44 69 73 |BalloonH|elp..Dis|
|00004ad0| 61 62 6c 65 64 42 61 6c | 6c 6f 6f 6e 48 65 6c 70 |abledBal|loonHelp|
|00004ae0| 00 08 4c 6f 63 6b 4c 65 | 66 74 05 46 61 6c 73 65 |..LockLe|ft.False|
|00004af0| 07 4c 6f 63 6b 54 6f 70 | 05 46 61 6c 73 65 09 4c |.LockTop|.False.L|
|00004b00| 6f 63 6b 52 69 67 68 74 | 05 46 61 6c 73 65 0a 4c |ockRight|.False.L|
|00004b10| 6f 63 6b 42 6f 74 74 6f | 6d 05 46 61 6c 73 65 08 |ockBotto|m.False.|
|00004b20| 54 65 78 74 46 6f 6e 74 | 06 47 65 6e 65 76 61 08 |TextFont|.Geneva.|
|00004b30| 54 65 78 74 53 69 7a 65 | 01 39 04 42 6f 6c 64 05 |TextSize|.9.Bold.|
|00004b40| 46 61 6c 73 65 06 49 74 | 61 6c 69 63 05 46 61 6c |False.It|alic.Fal|
|00004b50| 73 65 09 55 6e 64 65 72 | 6c 69 6e 65 05 46 61 6c |se.Under|line.Fal|
|00004b60| 73 65 04 54 65 78 74 05 | 43 69 74 79 3a 09 54 65 |se.Text.|City:.Te|
|00004b70| 78 74 41 6c 69 67 6e 01 | 30 09 54 65 78 74 43 6f |xtAlign.|0.TextCo|
|00004b80| 6c 6f 72 01 30 09 4d 75 | 6c 74 69 4c 69 6e 65 05 |lor.0.Mu|ltiLine.|
|00004b90| 46 61 6c 73 65 0d 0a 53 | 74 61 74 69 63 54 65 78 |False..S|taticTex|
|00004ba0| 74 17 04 4e 61 6d 65 0b | 53 74 61 74 69 63 54 65 |t..Name.|StaticTe|
|00004bb0| 78 74 36 05 49 6e 64 65 | 78 0b 2d 32 31 34 37 34 |xt6.Inde|x.-21474|
|00004bc0| 38 33 36 34 38 0d 54 61 | 62 50 61 6e 65 6c 49 6e |83648.Ta|bPanelIn|
|00004bd0| 64 65 78 01 30 07 56 69 | 73 69 62 6c 65 04 54 72 |dex.0.Vi|sible.Tr|
|00004be0| 75 65 04 4c 65 66 74 03 | 31 37 32 03 54 6f 70 02 |ue.Left.|172.Top.|
|00004bf0| 38 34 05 57 69 64 74 68 | 02 33 30 06 48 65 69 67 |84.Width|.30.Heig|
|00004c00| 68 74 02 31 32 0b 42 61 | 6c 6c 6f 6f 6e 48 65 6c |ht.12.Ba|lloonHel|
|00004c10| 70 00 13 44 69 73 61 62 | 6c 65 64 42 61 6c 6c 6f |p..Disab|ledBallo|
|00004c20| 6f 6e 48 65 6c 70 00 08 | 4c 6f 63 6b 4c 65 66 74 |onHelp..|LockLeft|
|00004c30| 05 46 61 6c 73 65 07 4c | 6f 63 6b 54 6f 70 05 46 |.False.L|ockTop.F|
|00004c40| 61 6c 73 65 09 4c 6f 63 | 6b 52 69 67 68 74 05 46 |alse.Loc|kRight.F|
|00004c50| 61 6c 73 65 0a 4c 6f 63 | 6b 42 6f 74 74 6f 6d 05 |alse.Loc|kBottom.|
|00004c60| 46 61 6c 73 65 08 54 65 | 78 74 46 6f 6e 74 06 47 |False.Te|xtFont.G|
|00004c70| 65 6e 65 76 61 08 54 65 | 78 74 53 69 7a 65 01 39 |eneva.Te|xtSize.9|
|00004c80| 04 42 6f 6c 64 05 46 61 | 6c 73 65 06 49 74 61 6c |.Bold.Fa|lse.Ital|
|00004c90| 69 63 05 46 61 6c 73 65 | 09 55 6e 64 65 72 6c 69 |ic.False|.Underli|
|00004ca0| 6e 65 05 46 61 6c 73 65 | 04 54 65 78 74 06 53 74 |ne.False|.Text.St|
|00004cb0| 61 74 65 3a 09 54 65 78 | 74 41 6c 69 67 6e 01 30 |ate:.Tex|tAlign.0|
|00004cc0| 09 54 65 78 74 43 6f 6c | 6f 72 01 30 09 4d 75 6c |.TextCol|or.0.Mul|
|00004cd0| 74 69 4c 69 6e 65 05 46 | 61 6c 73 65 0e 0a 53 74 |tiLine.F|alse..St|
|00004ce0| 61 74 69 63 54 65 78 74 | 17 04 4e 61 6d 65 0b 53 |aticText|..Name.S|
|00004cf0| 74 61 74 69 63 54 65 78 | 74 37 05 49 6e 64 65 78 |taticTex|t7.Index|
|00004d00| 0b 2d 32 31 34 37 34 38 | 33 36 34 38 0d 54 61 62 |.-214748|3648.Tab|
|00004d10| 50 61 6e 65 6c 49 6e 64 | 65 78 01 30 07 56 69 73 |PanelInd|ex.0.Vis|
|00004d20| 69 62 6c 65 04 54 72 75 | 65 04 4c 65 66 74 03 32 |ible.Tru|e.Left.2|
|00004d30| 35 37 03 54 6f 70 02 38 | 34 05 57 69 64 74 68 02 |57.Top.8|4.Width.|
|00004d40| 32 38 06 48 65 69 67 68 | 74 02 31 32 0b 42 61 6c |28.Heigh|t.12.Bal|
|00004d50| 6c 6f 6f 6e 48 65 6c 70 | 00 13 44 69 73 61 62 6c |loonHelp|..Disabl|
|00004d60| 65 64 42 61 6c 6c 6f 6f | 6e 48 65 6c 70 00 08 4c |edBalloo|nHelp..L|
|00004d70| 6f 63 6b 4c 65 66 74 05 | 46 61 6c 73 65 07 4c 6f |ockLeft.|False.Lo|
|00004d80| 63 6b 54 6f 70 05 46 61 | 6c 73 65 09 4c 6f 63 6b |ckTop.Fa|lse.Lock|
|00004d90| 52 69 67 68 74 05 46 61 | 6c 73 65 0a 4c 6f 63 6b |Right.Fa|lse.Lock|
|00004da0| 42 6f 74 74 6f 6d 05 46 | 61 6c 73 65 08 54 65 78 |Bottom.F|alse.Tex|
|00004db0| 74 46 6f 6e 74 06 47 65 | 6e 65 76 61 08 54 65 78 |tFont.Ge|neva.Tex|
|00004dc0| 74 53 69 7a 65 01 39 04 | 42 6f 6c 64 05 46 61 6c |tSize.9.|Bold.Fal|
|00004dd0| 73 65 06 49 74 61 6c 69 | 63 05 46 61 6c 73 65 09 |se.Itali|c.False.|
|00004de0| 55 6e 64 65 72 6c 69 6e | 65 05 46 61 6c 73 65 04 |Underlin|e.False.|
|00004df0| 54 65 78 74 04 5a 69 70 | 3a 09 54 65 78 74 41 6c |Text.Zip|:.TextAl|
|00004e00| 69 67 6e 01 30 09 54 65 | 78 74 43 6f 6c 6f 72 01 |ign.0.Te|xtColor.|
|00004e10| 30 09 4d 75 6c 74 69 4c | 69 6e 65 05 46 61 6c 73 |0.MultiL|ine.Fals|
|00004e20| 65 0f 00 0c 0f 04 56 69 | 65 77 0e 49 6d 70 6f 72 |e.....Vi|ew.Impor|
|00004e30| 74 50 72 6f 67 72 65 73 | 73 04 90 02 8a 02 12 04 |tProgres|s.......|
|00004e40| 4e 61 6d 65 0e 49 6d 70 | 6f 72 74 50 72 6f 67 72 |Name.Imp|ortProgr|
|00004e50| 65 73 73 05 46 72 61 6d | 65 01 31 0c 48 61 73 42 |ess.Fram|e.1.HasB|
|00004e60| 61 63 6b 43 6f 6c 6f 72 | 05 46 61 6c 73 65 09 42 |ackColor|.False.B|
|00004e70| 61 63 6b 43 6f 6c 6f 72 | 08 31 36 37 37 37 32 31 |ackColor|.1677721|
|00004e80| 35 08 42 61 63 6b 64 72 | 6f 70 01 30 05 54 69 74 |5.Backdr|op.0.Tit|
|00004e90| 6c 65 09 49 6d 70 6f 72 | 74 69 6e 67 07 56 69 73 |le.Impor|ting.Vis|
|00004ea0| 69 62 6c 65 04 54 72 75 | 65 08 43 6c 6f 73 65 42 |ible.Tru|e.CloseB|
|00004eb0| 6f 78 05 46 61 6c 73 65 | 08 47 72 6f 77 49 63 6f |ox.False|.GrowIco|
|00004ec0| 6e 05 46 61 6c 73 65 08 | 5a 6f 6f 6d 49 63 6f 6e |n.False.|ZoomIcon|
|00004ed0| 05 46 61 6c 73 65 0b 42 | 61 6c 6c 6f 6f 6e 48 65 |.False.B|alloonHe|
|00004ee0| 6c 70 00 09 50 6c 61 63 | 65 6d 65 6e 74 01 30 05 |lp..Plac|ement.0.|
|00004ef0| 57 69 64 74 68 03 33 30 | 30 06 48 65 69 67 68 74 |Width.30|0.Height|
|00004f00| 02 36 34 08 4d 69 6e 57 | 69 64 74 68 02 36 34 09 |.64.MinW|idth.64.|
|00004f10| 4d 69 6e 48 65 69 67 68 | 74 02 36 34 08 4d 61 78 |MinHeigh|t.64.Max|
|00004f20| 57 69 64 74 68 05 33 32 | 30 30 30 09 4d 61 78 48 |Width.32|000.MaxH|
|00004f30| 65 69 67 68 74 05 33 32 | 30 30 30 07 00 0e 49 6d |eight.32|000...Im|
|00004f40| 70 6f 72 74 50 72 6f 67 | 72 65 73 73 ac 01 06 44 |portProg|ress...D|
|00004f50| 69 61 6c 6f 67 00 00 00 | 00 00 00 00 03 07 00 00 |ialog...|........|
|00004f60| a0 01 0b 50 72 6f 67 72 | 65 73 73 42 61 72 00 00 |...Progr|essBar..|
|00004f70| 00 00 00 00 00 07 00 00 | b4 01 0a 53 74 61 74 69 |........|...Stati|
|00004f80| 63 54 65 78 74 00 00 00 | 00 00 00 00 07 00 00 b4 |cText...|........|
|00004f90| 01 0a 53 74 61 74 69 63 | 54 65 78 74 00 00 00 00 |..Static|Text....|
|00004fa0| 00 00 00 03 0b 50 72 6f | 67 72 65 73 73 42 61 72 |.....Pro|gressBar|
|00004fb0| 10 04 4e 61 6d 65 0c 50 | 72 6f 67 72 65 73 73 42 |..Name.P|rogressB|
|00004fc0| 61 72 31 05 49 6e 64 65 | 78 0b 2d 32 31 34 37 34 |ar1.Inde|x.-21474|
|00004fd0| 38 33 36 34 38 0d 54 61 | 62 50 61 6e 65 6c 49 6e |83648.Ta|bPanelIn|
|00004fe0| 64 65 78 01 30 07 56 69 | 73 69 62 6c 65 04 54 72 |dex.0.Vi|sible.Tr|
|00004ff0| 75 65 04 4c 65 66 74 02 | 31 33 03 54 6f 70 02 32 |ue.Left.|13.Top.2|
|00005000| 38 05 57 69 64 74 68 03 | 32 37 34 06 48 65 69 67 |8.Width.|274.Heig|
|00005010| 68 74 02 31 32 0b 42 61 | 6c 6c 6f 6f 6e 48 65 6c |ht.12.Ba|lloonHel|
|00005020| 70 00 13 44 69 73 61 62 | 6c 65 64 42 61 6c 6c 6f |p..Disab|ledBallo|
|00005030| 6f 6e 48 65 6c 70 00 08 | 4c 6f 63 6b 4c 65 66 74 |onHelp..|LockLeft|
|00005040| 05 46 61 6c 73 65 07 4c | 6f 63 6b 54 6f 70 05 46 |.False.L|ockTop.F|
|00005050| 61 6c 73 65 09 4c 6f 63 | 6b 52 69 67 68 74 05 46 |alse.Loc|kRight.F|
|00005060| 61 6c 73 65 0a 4c 6f 63 | 6b 42 6f 74 74 6f 6d 05 |alse.Loc|kBottom.|
|00005070| 46 61 6c 73 65 05 56 61 | 6c 75 65 01 30 07 4d 61 |False.Va|lue.0.Ma|
|00005080| 78 69 6d 75 6d 01 30 00 | 0a 53 74 61 74 69 63 54 |ximum.0.|.StaticT|
|00005090| 65 78 74 17 04 4e 61 6d | 65 05 54 6f 74 61 6c 05 |ext..Nam|e.Total.|
|000050a0| 49 6e 64 65 78 0b 2d 32 | 31 34 37 34 38 33 36 34 |Index.-2|14748364|
|000050b0| 38 0d 54 61 62 50 61 6e | 65 6c 49 6e 64 65 78 01 |8.TabPan|elIndex.|
|000050c0| 30 07 56 69 73 69 62 6c | 65 04 54 72 75 65 04 4c |0.Visibl|e.True.L|
|000050d0| 65 66 74 03 32 32 37 03 | 54 6f 70 02 32 39 05 57 |eft.227.|Top.29.W|
|000050e0| 69 64 74 68 02 36 30 06 | 48 65 69 67 68 74 02 31 |idth.60.|Height.1|
|000050f0| 32 0b 42 61 6c 6c 6f 6f | 6e 48 65 6c 70 00 13 44 |2.Balloo|nHelp..D|
|00005100| 69 73 61 62 6c 65 64 42 | 61 6c 6c 6f 6f 6e 48 65 |isabledB|alloonHe|
|00005110| 6c 70 00 08 4c 6f 63 6b | 4c 65 66 74 05 46 61 6c |lp..Lock|Left.Fal|
|00005120| 73 65 07 4c 6f 63 6b 54 | 6f 70 05 46 61 6c 73 65 |se.LockT|op.False|
|00005130| 09 4c 6f 63 6b 52 69 67 | 68 74 05 46 61 6c 73 65 |.LockRig|ht.False|
|00005140| 0a 4c 6f 63 6b 42 6f 74 | 74 6f 6d 05 46 61 6c 73 |.LockBot|tom.Fals|
|00005150| 65 08 54 65 78 74 46 6f | 6e 74 06 47 65 6e 65 76 |e.TextFo|nt.Genev|
|00005160| 61 08 54 65 78 74 53 69 | 7a 65 01 39 04 42 6f 6c |a.TextSi|ze.9.Bol|
|00005170| 64 05 46 61 6c 73 65 06 | 49 74 61 6c 69 63 05 46 |d.False.|Italic.F|
|00005180| 61 6c 73 65 09 55 6e 64 | 65 72 6c 69 6e 65 05 46 |alse.Und|erline.F|
|00005190| 61 6c 73 65 04 54 65 78 | 74 00 09 54 65 78 74 41 |alse.Tex|t..TextA|
|000051a0| 6c 69 67 6e 01 32 09 54 | 65 78 74 43 6f 6c 6f 72 |lign.2.T|extColor|
|000051b0| 01 30 09 4d 75 6c 74 69 | 4c 69 6e 65 05 46 61 6c |.0.Multi|Line.Fal|
|000051c0| 73 65 01 0a 53 74 61 74 | 69 63 54 65 78 74 17 04 |se..Stat|icText..|
|000051d0| 4e 61 6d 65 0b 53 74 61 | 74 69 63 54 65 78 74 31 |Name.Sta|ticText1|
|000051e0| 05 49 6e 64 65 78 0b 2d | 32 31 34 37 34 38 33 36 |.Index.-|21474836|
|000051f0| 34 38 0d 54 61 62 50 61 | 6e 65 6c 49 6e 64 65 78 |48.TabPa|nelIndex|
|00005200| 01 30 07 56 69 73 69 62 | 6c 65 04 54 72 75 65 04 |.0.Visib|le.True.|
|00005210| 4c 65 66 74 02 31 33 03 | 54 6f 70 02 31 30 05 57 |Left.13.|Top.10.W|
|00005220| 69 64 74 68 03 32 37 34 | 06 48 65 69 67 68 74 02 |idth.274|.Height.|
|00005230| 31 32 0b 42 61 6c 6c 6f | 6f 6e 48 65 6c 70 00 13 |12.Ballo|onHelp..|
|00005240| 44 69 73 61 62 6c 65 64 | 42 61 6c 6c 6f 6f 6e 48 |Disabled|BalloonH|
|00005250| 65 6c 70 00 08 4c 6f 63 | 6b 4c 65 66 74 05 46 61 |elp..Loc|kLeft.Fa|
|00005260| 6c 73 65 07 4c 6f 63 6b | 54 6f 70 05 46 61 6c 73 |lse.Lock|Top.Fals|
|00005270| 65 09 4c 6f 63 6b 52 69 | 67 68 74 05 46 61 6c 73 |e.LockRi|ght.Fals|
|00005280| 65 0a 4c 6f 63 6b 42 6f | 74 74 6f 6d 05 46 61 6c |e.LockBo|ttom.Fal|
|00005290| 73 65 08 54 65 78 74 46 | 6f 6e 74 06 47 65 6e 65 |se.TextF|ont.Gene|
|000052a0| 76 61 08 54 65 78 74 53 | 69 7a 65 01 39 04 42 6f |va.TextS|ize.9.Bo|
|000052b0| 6c 64 05 46 61 6c 73 65 | 06 49 74 61 6c 69 63 05 |ld.False|.Italic.|
|000052c0| 46 61 6c 73 65 09 55 6e | 64 65 72 6c 69 6e 65 05 |False.Un|derline.|
|000052d0| 46 61 6c 73 65 04 54 65 | 78 74 1c 49 6d 70 6f 72 |False.Te|xt.Impor|
|000052e0| 74 69 6e 67 20 33 30 2c | 30 30 30 20 64 6f 63 74 |ting 30,|000 doct|
|000052f0| 6f 72 73 2e 2e 2e 2e 09 | 54 65 78 74 41 6c 69 67 |ors.....|TextAlig|
|00005300| 6e 01 30 09 54 65 78 74 | 43 6f 6c 6f 72 01 30 09 |n.0.Text|Color.0.|
|00005310| 4d 75 6c 74 69 4c 69 6e | 65 05 46 61 6c 73 65 02 |MultiLin|e.False.|
|00005320| 00 0d 0f 04 56 69 65 77 | 04 46 69 6e 64 04 8a 02 |....View|.Find...|
|00005330| 8c 02 12 04 4e 61 6d 65 | 04 46 69 6e 64 05 46 72 |....Name|.Find.Fr|
|00005340| 61 6d 65 01 31 0c 48 61 | 73 42 61 63 6b 43 6f 6c |ame.1.Ha|sBackCol|
|00005350| 6f 72 05 46 61 6c 73 65 | 09 42 61 63 6b 43 6f 6c |or.False|.BackCol|
|00005360| 6f 72 08 31 36 37 37 37 | 32 31 35 08 42 61 63 6b |or.16777|215.Back|
|00005370| 64 72 6f 70 01 30 05 54 | 69 74 6c 65 0c 46 69 6e |drop.0.T|itle.Fin|
|00005380| 64 20 44 6f 63 74 6f 72 | 73 07 56 69 73 69 62 6c |d Doctor|s.Visibl|
|00005390| 65 04 54 72 75 65 08 43 | 6c 6f 73 65 42 6f 78 05 |e.True.C|loseBox.|
|000053a0| 46 61 6c 73 65 08 47 72 | 6f 77 49 63 6f 6e 05 46 |False.Gr|owIcon.F|
|000053b0| 61 6c 73 65 08 5a 6f 6f | 6d 49 63 6f 6e 05 46 61 |alse.Zoo|mIcon.Fa|
|000053c0| 6c 73 65 0b 42 61 6c 6c | 6f 6f 6e 48 65 6c 70 00 |lse.Ball|oonHelp.|
|000053d0| 09 50 6c 61 63 65 6d 65 | 6e 74 01 30 05 57 69 64 |.Placeme|nt.0.Wid|
|000053e0| 74 68 03 33 34 39 06 48 | 65 69 67 68 74 02 38 30 |th.349.H|eight.80|
|000053f0| 08 4d 69 6e 57 69 64 74 | 68 02 36 34 09 4d 69 6e |.MinWidt|h.64.Min|
|00005400| 48 65 69 67 68 74 02 36 | 34 08 4d 61 78 57 69 64 |Height.6|4.MaxWid|
|00005410| 74 68 05 33 32 30 30 30 | 09 4d 61 78 48 65 69 67 |th.32000|.MaxHeig|
|00005420| 68 74 05 33 32 30 30 30 | 07 00 04 46 69 6e 64 ac |ht.32000|...Find.|
|00005430| 01 06 44 69 61 6c 6f 67 | 00 00 00 00 00 00 00 06 |..Dialog|........|
|00005440| 07 00 00 b4 01 0a 53 74 | 61 74 69 63 54 65 78 74 |......St|aticText|
|00005450| 00 00 00 00 00 00 00 07 | 00 00 b4 01 09 50 6f 70 |........|.....Pop|
|00005460| 75 70 4d 65 6e 75 00 00 | 00 00 02 04 4f 70 65 6e |upMenu..|....Open|
|00005470| 01 0e 01 0e 03 0a 53 75 | 62 20 4f 70 65 6e 28 29 |......Su|b Open()|
|00005480| 0e 6d 65 2e 6c 69 73 74 | 69 6e 64 65 78 3d 30 07 |.me.list|index=0.|
|00005490| 45 6e 64 20 53 75 62 06 | 43 68 61 6e 67 65 01 00 |End Sub.|Change..|
|000054a0| 01 00 03 0c 53 75 62 20 | 43 68 61 6e 67 65 28 29 |....Sub |Change()|
|000054b0| 00 07 45 6e 64 20 53 75 | 62 00 00 07 00 00 b4 01 |..End Su|b.......|
|000054c0| 0a 53 74 61 74 69 63 54 | 65 78 74 00 00 00 00 00 |.StaticT|ext.....|
|000054d0| 00 00 07 00 00 88 02 09 | 45 64 69 74 46 69 65 6c |........|EditFiel|
|000054e0| 64 00 00 00 00 00 00 00 | 07 00 00 b4 01 0a 50 75 |d.......|......Pu|
|000054f0| 73 68 42 75 74 74 6f 6e | 00 00 00 00 01 06 41 63 |shButton|......Ac|
|00005500| 74 69 6f 6e 03 00 04 3e | 07 0c 53 75 62 20 41 63 |tion...>|..Sub Ac|
|00005510| 74 69 6f 6e 28 29 30 64 | 6f 63 74 6f 72 73 4c 69 |tion()0d|octorsLi|
|00005520| 73 74 2e 64 6f 63 74 6f | 72 73 51 75 65 72 79 2e |st.docto|rsQuery.|
|00005530| 64 61 74 61 62 61 73 65 | 3d 64 6f 63 74 6f 72 73 |database|=doctors|
|00005540| 4c 69 73 74 2e 64 62 87 | 02 64 6f 63 74 6f 72 73 |List.db.|.doctors|
|00005550| 4c 69 73 74 2e 64 6f 63 | 74 6f 72 73 51 75 65 72 |List.doc|torsQuer|
|00005560| 79 2e 73 71 4c 51 75 65 | 72 79 3d 22 53 65 6c 65 |y.sqLQue|ry="Sele|
|00005570| 63 74 20 46 69 72 73 74 | 2c 20 4c 61 73 74 2c 20 |ct First|, Last, |
|00005580| 53 70 65 63 69 61 6c 74 | 79 2c 20 43 69 74 79 2c |Specialt|y, City,|
|00005590| 20 49 44 20 66 72 6f 6d | 20 44 6f 63 74 6f 72 73 | ID from| Doctors|
|000055a0| 20 77 68 65 72 65 20 22 | 2b 46 69 6e 64 43 6f 6c | where "|+FindCol|
|000055b0| 75 6d 6e 2e 74 65 78 74 | 2b 22 3d 27 22 2b 66 69 |umn.text|+"='"+fi|
|000055c0| 6e 64 76 61 6c 75 65 2e | 74 65 78 74 2b 22 27 22 |ndvalue.|text+"'"|
|000055d0| 21 64 6f 63 74 6f 72 73 | 4c 69 73 74 2e 64 6f 63 |!doctors|List.doc|
|000055e0| 74 6f 72 73 51 75 65 72 | 79 2e 72 75 6e 51 75 65 |torsQuer|y.runQue|
|000055f0| 72 79 3e 64 6f 63 74 6f | 72 73 4c 69 73 74 2e 72 |ry>docto|rsList.r|
|00005600| 6f 77 73 46 6f 75 6e 64 | 2e 74 65 78 74 3d 73 74 |owsFound|.text=st|
|00005610| 72 28 64 6f 63 74 6f 72 | 73 4c 69 73 74 2e 6c 69 |r(doctor|sList.li|
|00005620| 73 74 42 6f 78 31 2e 6c | 69 73 74 63 6f 75 6e 74 |stBox1.l|istcount|
|00005630| 29 05 63 6c 6f 73 65 07 | 45 6e 64 20 53 75 62 00 |).close.|End Sub.|
|00005640| 00 07 00 00 b4 01 0a 50 | 75 73 68 42 75 74 74 6f |.......P|ushButto|
|00005650| 6e 00 00 00 00 01 06 41 | 63 74 69 6f 6e 01 05 01 |n......A|ction...|
|00005660| 05 03 0c 53 75 62 20 41 | 63 74 69 6f 6e 28 29 05 |...Sub A|ction().|
|00005670| 63 6c 6f 73 65 07 45 6e | 64 20 53 75 62 00 00 06 |close.En|d Sub...|
|00005680| 0a 53 74 61 74 69 63 54 | 65 78 74 17 04 4e 61 6d |.StaticT|ext..Nam|
|00005690| 65 0b 53 74 61 74 69 63 | 54 65 78 74 31 05 49 6e |e.Static|Text1.In|
|000056a0| 64 65 78 0b 2d 32 31 34 | 37 34 38 33 36 34 38 0d |dex.-214|7483648.|
|000056b0| 54 61 62 50 61 6e 65 6c | 49 6e 64 65 78 01 30 07 |TabPanel|Index.0.|
|000056c0| 56 69 73 69 62 6c 65 04 | 54 72 75 65 04 4c 65 66 |Visible.|True.Lef|
|000056d0| 74 02 31 33 03 54 6f 70 | 02 31 33 05 57 69 64 74 |t.13.Top|.13.Widt|
|000056e0| 68 02 34 37 06 48 65 69 | 67 68 74 02 31 36 0b 42 |h.47.Hei|ght.16.B|
|000056f0| 61 6c 6c 6f 6f 6e 48 65 | 6c 70 00 13 44 69 73 61 |alloonHe|lp..Disa|
|00005700| 62 6c 65 64 42 61 6c 6c | 6f 6f 6e 48 65 6c 70 00 |bledBall|oonHelp.|
|00005710| 08 4c 6f 63 6b 4c 65 66 | 74 05 46 61 6c 73 65 07 |.LockLef|t.False.|
|00005720| 4c 6f 63 6b 54 6f 70 05 | 46 61 6c 73 65 09 4c 6f |LockTop.|False.Lo|
|00005730| 63 6b 52 69 67 68 74 05 | 46 61 6c 73 65 0a 4c 6f |ckRight.|False.Lo|
|00005740| 63 6b 42 6f 74 74 6f 6d | 05 46 61 6c 73 65 08 54 |ckBottom|.False.T|
|00005750| 65 78 74 46 6f 6e 74 06 | 53 79 73 74 65 6d 08 54 |extFont.|System.T|
|00005760| 65 78 74 53 69 7a 65 02 | 31 32 04 42 6f 6c 64 05 |extSize.|12.Bold.|
|00005770| 46 61 6c 73 65 06 49 74 | 61 6c 69 63 05 46 61 6c |False.It|alic.Fal|
|00005780| 73 65 09 55 6e 64 65 72 | 6c 69 6e 65 05 46 61 6c |se.Under|line.Fal|
|00005790| 73 65 04 54 65 78 74 05 | 57 68 65 72 65 09 54 65 |se.Text.|Where.Te|
|000057a0| 78 74 41 6c 69 67 6e 01 | 30 09 54 65 78 74 43 6f |xtAlign.|0.TextCo|
|000057b0| 6c 6f 72 01 30 09 4d 75 | 6c 74 69 4c 69 6e 65 05 |lor.0.Mu|ltiLine.|
|000057c0| 46 61 6c 73 65 00 09 50 | 6f 70 75 70 4d 65 6e 75 |False..P|opupMenu|
|000057d0| 15 04 4e 61 6d 65 0a 66 | 69 6e 64 43 6f 6c 75 6d |..Name.f|indColum|
|000057e0| 6e 05 49 6e 64 65 78 0b | 2d 32 31 34 37 34 38 33 |n.Index.|-2147483|
|000057f0| 36 34 38 0d 54 61 62 50 | 61 6e 65 6c 49 6e 64 65 |648.TabP|anelInde|
|00005800| 78 01 30 07 56 69 73 69 | 62 6c 65 04 54 72 75 65 |x.0.Visi|ble.True|
|00005810| 04 4c 65 66 74 02 36 32 | 03 54 6f 70 02 31 31 05 |.Left.62|.Top.11.|
|00005820| 57 69 64 74 68 03 31 32 | 37 06 48 65 69 67 68 74 |Width.12|7.Height|
|00005830| 02 32 30 0b 42 61 6c 6c | 6f 6f 6e 48 65 6c 70 00 |.20.Ball|oonHelp.|
|00005840| 13 44 69 73 61 62 6c 65 | 64 42 61 6c 6c 6f 6f 6e |.Disable|dBalloon|
|00005850| 48 65 6c 70 00 08 4c 6f | 63 6b 4c 65 66 74 05 46 |Help..Lo|ckLeft.F|
|00005860| 61 6c 73 65 07 4c 6f 63 | 6b 54 6f 70 05 46 61 6c |alse.Loc|kTop.Fal|
|00005870| 73 65 09 4c 6f 63 6b 52 | 69 67 68 74 05 46 61 6c |se.LockR|ight.Fal|
|00005880| 73 65 0a 4c 6f 63 6b 42 | 6f 74 74 6f 6d 05 46 61 |se.LockB|ottom.Fa|
|00005890| 6c 73 65 08 54 65 78 74 | 46 6f 6e 74 06 53 79 73 |lse.Text|Font.Sys|
|000058a0| 74 65 6d 08 54 65 78 74 | 53 69 7a 65 02 31 32 04 |tem.Text|Size.12.|
|000058b0| 42 6f 6c 64 05 46 61 6c | 73 65 06 49 74 61 6c 69 |Bold.Fal|se.Itali|
|000058c0| 63 05 46 61 6c 73 65 09 | 55 6e 64 65 72 6c 69 6e |c.False.|Underlin|
|000058d0| 65 05 46 61 6c 73 65 07 | 45 6e 61 62 6c 65 64 04 |e.False.|Enabled.|
|000058e0| 54 72 75 65 0c 49 6e 69 | 74 69 61 6c 56 61 6c 75 |True.Ini|tialValu|
|000058f0| 65 2e 49 44 0d 46 69 72 | 73 74 0d 4c 61 73 74 0d |e.ID.Fir|st.Last.|
|00005900| 53 70 65 63 69 61 6c 74 | 79 0d 41 64 64 72 65 73 |Specialt|y.Addres|
|00005910| 73 0d 43 69 74 79 0d 53 | 74 61 74 65 0d 5a 69 70 |s.City.S|tate.Zip|
|00005920| 01 0a 53 74 61 74 69 63 | 54 65 78 74 17 04 4e 61 |..Static|Text..Na|
|00005930| 6d 65 0b 53 74 61 74 69 | 63 54 65 78 74 32 05 49 |me.Stati|cText2.I|
|00005940| 6e 64 65 78 0b 2d 32 31 | 34 37 34 38 33 36 34 38 |ndex.-21|47483648|
|00005950| 0d 54 61 62 50 61 6e 65 | 6c 49 6e 64 65 78 01 30 |.TabPane|lIndex.0|
|00005960| 07 56 69 73 69 62 6c 65 | 04 54 72 75 65 04 4c 65 |.Visible|.True.Le|
|00005970| 66 74 03 31 39 38 03 54 | 6f 70 02 31 33 05 57 69 |ft.198.T|op.13.Wi|
|00005980| 64 74 68 02 32 32 06 48 | 65 69 67 68 74 02 31 36 |dth.22.H|eight.16|
|00005990| 0b 42 61 6c 6c 6f 6f 6e | 48 65 6c 70 00 13 44 69 |.Balloon|Help..Di|
|000059a0| 73 61 62 6c 65 64 42 61 | 6c 6c 6f 6f 6e 48 65 6c |sabledBa|lloonHel|
|000059b0| 70 00 08 4c 6f 63 6b 4c | 65 66 74 05 46 61 6c 73 |p..LockL|eft.Fals|
|000059c0| 65 07 4c 6f 63 6b 54 6f | 70 05 46 61 6c 73 65 09 |e.LockTo|p.False.|
|000059d0| 4c 6f 63 6b 52 69 67 68 | 74 05 46 61 6c 73 65 0a |LockRigh|t.False.|
|000059e0| 4c 6f 63 6b 42 6f 74 74 | 6f 6d 05 46 61 6c 73 65 |LockBott|om.False|
|000059f0| 08 54 65 78 74 46 6f 6e | 74 06 53 79 73 74 65 6d |.TextFon|t.System|
|00005a00| 08 54 65 78 74 53 69 7a | 65 02 31 32 04 42 6f 6c |.TextSiz|e.12.Bol|
|00005a10| 64 05 46 61 6c 73 65 06 | 49 74 61 6c 69 63 05 46 |d.False.|Italic.F|
|00005a20| 61 6c 73 65 09 55 6e 64 | 65 72 6c 69 6e 65 05 46 |alse.Und|erline.F|
|00005a30| 61 6c 73 65 04 54 65 78 | 74 02 69 73 09 54 65 78 |alse.Tex|t.is.Tex|
|00005a40| 74 41 6c 69 67 6e 01 30 | 09 54 65 78 74 43 6f 6c |tAlign.0|.TextCol|
|00005a50| 6f 72 01 30 09 4d 75 6c | 74 69 4c 69 6e 65 05 46 |or.0.Mul|tiLine.F|
|00005a60| 61 6c 73 65 02 09 45 64 | 69 74 46 69 65 6c 64 20 |alse..Ed|itField |
|00005a70| 04 4e 61 6d 65 09 46 69 | 6e 64 56 61 6c 75 65 05 |.Name.Fi|ndValue.|
|00005a80| 49 6e 64 65 78 0b 2d 32 | 31 34 37 34 38 33 36 34 |Index.-2|14748364|
|00005a90| 38 0d 54 61 62 50 61 6e | 65 6c 49 6e 64 65 78 01 |8.TabPan|elIndex.|
|00005aa0| 30 07 56 69 73 69 62 6c | 65 04 54 72 75 65 04 4c |0.Visibl|e.True.L|
|00005ab0| 65 66 74 03 32 31 38 03 | 54 6f 70 02 31 30 05 57 |eft.218.|Top.10.W|
|00005ac0| 69 64 74 68 03 31 31 38 | 06 48 65 69 67 68 74 02 |idth.118|.Height.|
|00005ad0| 32 32 0b 42 61 6c 6c 6f | 6f 6e 48 65 6c 70 00 13 |22.Ballo|onHelp..|
|00005ae0| 44 69 73 61 62 6c 65 64 | 42 61 6c 6c 6f 6f 6e 48 |Disabled|BalloonH|
|00005af0| 65 6c 70 00 08 4c 6f 63 | 6b 4c 65 66 74 05 46 61 |elp..Loc|kLeft.Fa|
|00005b00| 6c 73 65 07 4c 6f 63 6b | 54 6f 70 05 46 61 6c 73 |lse.Lock|Top.Fals|
|00005b10| 65 09 4c 6f 63 6b 52 69 | 67 68 74 05 46 61 6c 73 |e.LockRi|ght.Fals|
|00005b20| 65 0a 4c 6f 63 6b 42 6f | 74 74 6f 6d 05 46 61 6c |e.LockBo|ttom.Fal|
|00005b30| 73 65 08 54 65 78 74 46 | 6f 6e 74 06 53 79 73 74 |se.TextF|ont.Syst|
|00005b40| 65 6d 08 54 65 78 74 53 | 69 7a 65 02 31 32 04 42 |em.TextS|ize.12.B|
|00005b50| 6f 6c 64 05 46 61 6c 73 | 65 06 49 74 61 6c 69 63 |old.Fals|e.Italic|
|00005b60| 05 46 61 6c 73 65 09 55 | 6e 64 65 72 6c 69 6e 65 |.False.U|nderline|
|00005b70| 05 46 61 6c 73 65 06 42 | 6f 72 64 65 72 04 54 72 |.False.B|order.Tr|
|00005b80| 75 65 09 4d 75 6c 74 69 | 4c 69 6e 65 05 46 61 6c |ue.Multi|Line.Fal|
|00005b90| 73 65 09 53 63 72 6f 6c | 6c 42 61 72 04 54 72 75 |se.Scrol|lBar.Tru|
|00005ba0| 65 06 53 74 79 6c 65 64 | 05 46 61 6c 73 65 08 50 |e.Styled|.False.P|
|00005bb0| 61 73 73 77 6f 72 64 05 | 46 61 6c 73 65 0c 55 73 |assword.|False.Us|
|00005bc0| 65 46 6f 63 75 73 52 69 | 6e 67 04 54 72 75 65 08 |eFocusRi|ng.True.|
|00005bd0| 52 65 61 64 4f 6e 6c 79 | 05 46 61 6c 73 65 09 4c |ReadOnly|.False.L|
|00005be0| 69 6d 69 74 54 65 78 74 | 01 30 0a 41 63 63 65 70 |imitText|.0.Accep|
|00005bf0| 74 54 61 62 73 05 46 61 | 6c 73 65 09 54 65 78 74 |tTabs.Fa|lse.Text|
|00005c00| 43 6f 6c 6f 72 01 30 09 | 42 61 63 6b 43 6f 6c 6f |Color.0.|BackColo|
|00005c10| 72 08 31 36 37 37 37 32 | 31 35 07 45 6e 61 62 6c |r.167772|15.Enabl|
|00005c20| 65 64 04 54 72 75 65 04 | 54 65 78 74 00 03 0a 50 |ed.True.|Text...P|
|00005c30| 75 73 68 42 75 74 74 6f | 6e 17 04 4e 61 6d 65 0b |ushButto|n..Name.|
|00005c40| 50 75 73 68 42 75 74 74 | 6f 6e 31 05 49 6e 64 65 |PushButt|on1.Inde|
|00005c50| 78 0b 2d 32 31 34 37 34 | 38 33 36 34 38 0d 54 61 |x.-21474|83648.Ta|
|00005c60| 62 50 61 6e 65 6c 49 6e | 64 65 78 01 30 07 56 69 |bPanelIn|dex.0.Vi|
|00005c70| 73 69 62 6c 65 04 54 72 | 75 65 04 4c 65 66 74 03 |sible.Tr|ue.Left.|
|00005c80| 32 37 36 03 54 6f 70 02 | 34 31 05 57 69 64 74 68 |276.Top.|41.Width|
|00005c90| 02 36 30 06 48 65 69 67 | 68 74 02 32 30 0b 42 61 |.60.Heig|ht.20.Ba|
|00005ca0| 6c 6c 6f 6f 6e 48 65 6c | 70 00 13 44 69 73 61 62 |lloonHel|p..Disab|
|00005cb0| 6c 65 64 42 61 6c 6c 6f | 6f 6e 48 65 6c 70 00 08 |ledBallo|onHelp..|
|00005cc0| 4c 6f 63 6b 4c 65 66 74 | 05 46 61 6c 73 65 07 4c |LockLeft|.False.L|
|00005cd0| 6f 63 6b 54 6f 70 05 46 | 61 6c 73 65 09 4c 6f 63 |ockTop.F|alse.Loc|
|00005ce0| 6b 52 69 67 68 74 05 46 | 61 6c 73 65 0a 4c 6f 63 |kRight.F|alse.Loc|
|00005cf0| 6b 42 6f 74 74 6f 6d 05 | 46 61 6c 73 65 08 54 65 |kBottom.|False.Te|
|00005d00| 78 74 46 6f 6e 74 06 53 | 79 73 74 65 6d 08 54 65 |xtFont.S|ystem.Te|
|00005d10| 78 74 53 69 7a 65 02 31 | 32 04 42 6f 6c 64 05 46 |xtSize.1|2.Bold.F|
|00005d20| 61 6c 73 65 06 49 74 61 | 6c 69 63 05 46 61 6c 73 |alse.Ita|lic.Fals|
|00005d30| 65 09 55 6e 64 65 72 6c | 69 6e 65 05 46 61 6c 73 |e.Underl|ine.Fals|
|00005d40| 65 07 43 61 70 74 69 6f | 6e 04 46 69 6e 64 07 44 |e.Captio|n.Find.D|
|00005d50| 65 66 61 75 6c 74 04 54 | 72 75 65 06 43 61 6e 63 |efault.T|rue.Canc|
|00005d60| 65 6c 05 46 61 6c 73 65 | 07 45 6e 61 62 6c 65 64 |el.False|.Enabled|
|00005d70| 04 54 72 75 65 04 0a 50 | 75 73 68 42 75 74 74 6f |.True..P|ushButto|
|00005d80| 6e 17 04 4e 61 6d 65 0b | 50 75 73 68 42 75 74 74 |n..Name.|PushButt|
|00005d90| 6f 6e 32 05 49 6e 64 65 | 78 0b 2d 32 31 34 37 34 |on2.Inde|x.-21474|
|00005da0| 38 33 36 34 38 0d 54 61 | 62 50 61 6e 65 6c 49 6e |83648.Ta|bPanelIn|
|00005db0| 64 65 78 01 30 07 56 69 | 73 69 62 6c 65 04 54 72 |dex.0.Vi|sible.Tr|
|00005dc0| 75 65 04 4c 65 66 74 03 | 31 39 38 03 54 6f 70 02 |ue.Left.|198.Top.|
|00005dd0| 34 31 05 57 69 64 74 68 | 02 36 30 06 48 65 69 67 |41.Width|.60.Heig|
|00005de0| 68 74 02 32 30 0b 42 61 | 6c 6c 6f 6f 6e 48 65 6c |ht.20.Ba|lloonHel|
|00005df0| 70 00 13 44 69 73 61 62 | 6c 65 64 42 61 6c 6c 6f |p..Disab|ledBallo|
|00005e00| 6f 6e 48 65 6c 70 00 08 | 4c 6f 63 6b 4c 65 66 74 |onHelp..|LockLeft|
|00005e10| 05 46 61 6c 73 65 07 4c | 6f 63 6b 54 6f 70 05 46 |.False.L|ockTop.F|
|00005e20| 61 6c 73 65 09 4c 6f 63 | 6b 52 69 67 68 74 05 46 |alse.Loc|kRight.F|
|00005e30| 61 6c 73 65 0a 4c 6f 63 | 6b 42 6f 74 74 6f 6d 05 |alse.Loc|kBottom.|
|00005e40| 46 61 6c 73 65 08 54 65 | 78 74 46 6f 6e 74 06 53 |False.Te|xtFont.S|
|00005e50| 79 73 74 65 6d 08 54 65 | 78 74 53 69 7a 65 02 31 |ystem.Te|xtSize.1|
|00005e60| 32 04 42 6f 6c 64 05 46 | 61 6c 73 65 06 49 74 61 |2.Bold.F|alse.Ita|
|00005e70| 6c 69 63 05 46 61 6c 73 | 65 09 55 6e 64 65 72 6c |lic.Fals|e.Underl|
|00005e80| 69 6e 65 05 46 61 6c 73 | 65 07 43 61 70 74 69 6f |ine.Fals|e.Captio|
|00005e90| 6e 06 43 61 6e 63 65 6c | 07 44 65 66 61 75 6c 74 |n.Cancel|.Default|
|00005ea0| 05 46 61 6c 73 65 06 43 | 61 6e 63 65 6c 04 54 72 |.False.C|ancel.Tr|
|00005eb0| 75 65 07 45 6e 61 62 6c | 65 64 04 54 72 75 65 05 |ue.Enabl|ed.True.|
|00005ec0| 00 0e 0f 04 56 69 65 77 | 0d 43 6f 6e 66 69 72 6d |....View|.Confirm|
|00005ed0| 44 65 6c 65 74 65 04 ae | 01 a4 01 12 04 4e 61 6d |Delete..|.....Nam|
|00005ee0| 65 0d 43 6f 6e 66 69 72 | 6d 44 65 6c 65 74 65 05 |e.Confir|mDelete.|
|00005ef0| 46 72 61 6d 65 01 32 0c | 48 61 73 42 61 63 6b 43 |Frame.2.|HasBackC|
|00005f00| 6f 6c 6f 72 05 46 61 6c | 73 65 09 42 61 63 6b 43 |olor.Fal|se.BackC|
|00005f10| 6f 6c 6f 72 08 31 36 37 | 37 37 32 31 35 08 42 61 |olor.167|77215.Ba|
|00005f20| 63 6b 64 72 6f 70 01 30 | 05 54 69 74 6c 65 08 55 |ckdrop.0|.Title.U|
|00005f30| 6e 74 69 74 6c 65 64 07 | 56 69 73 69 62 6c 65 04 |ntitled.|Visible.|
|00005f40| 54 72 75 65 08 43 6c 6f | 73 65 42 6f 78 05 46 61 |True.Clo|seBox.Fa|
|00005f50| 6c 73 65 08 47 72 6f 77 | 49 63 6f 6e 05 46 61 6c |lse.Grow|Icon.Fal|
|00005f60| 73 65 08 5a 6f 6f 6d 49 | 63 6f 6e 05 46 61 6c 73 |se.ZoomI|con.Fals|
|00005f70| 65 0b 42 61 6c 6c 6f 6f | 6e 48 65 6c 70 00 09 50 |e.Balloo|nHelp..P|
|00005f80| 6c 61 63 65 6d 65 6e 74 | 01 30 05 57 69 64 74 68 |lacement|.0.Width|
|00005f90| 03 33 32 35 06 48 65 69 | 67 68 74 02 39 39 08 4d |.325.Hei|ght.99.M|
|00005fa0| 69 6e 57 69 64 74 68 02 | 36 34 09 4d 69 6e 48 65 |inWidth.|64.MinHe|
|00005fb0| 69 67 68 74 02 36 34 08 | 4d 61 78 57 69 64 74 68 |ight.64.|MaxWidth|
|00005fc0| 05 33 32 30 30 30 09 4d | 61 78 48 65 69 67 68 74 |.32000.M|axHeight|
|00005fd0| 05 33 32 30 30 30 07 00 | 0d 43 6f 6e 66 69 72 6d |.32000..|.Confirm|
|00005fe0| 44 65 6c 65 74 65 b0 01 | 06 44 69 61 6c 6f 67 00 |Delete..|.Dialog.|
|00005ff0| 01 10 50 61 72 65 6e 74 | 20 61 73 20 57 69 6e 64 |..Parent| as Wind|
|00006000| 6f 77 00 00 00 01 04 4f | 70 65 6e 01 00 01 00 03 |ow.....O|pen.....|
|00006010| 0a 53 75 62 20 4f 70 65 | 6e 28 29 00 07 45 6e 64 |.Sub Ope|n()..End|
|00006020| 20 53 75 62 00 00 04 07 | 00 00 a4 01 06 43 61 6e | Sub....|.....Can|
|00006030| 76 61 73 00 00 00 00 01 | 05 50 61 69 6e 74 01 00 |vas.....|.Paint..|
|00006040| 01 15 03 18 53 75 62 20 | 50 61 69 6e 74 28 67 20 |....Sub |Paint(g |
|00006050| 41 73 20 47 72 61 70 68 | 69 63 73 29 15 67 2e 64 |As Graph|ics).g.d|
|00006060| 72 61 77 63 61 75 74 69 | 6f 6e 49 63 6f 6e 20 30 |rawcauti|onIcon 0|
|00006070| 2c 30 07 45 6e 64 20 53 | 75 62 00 00 07 00 00 b4 |,0.End S|ub......|
|00006080| 01 0a 53 74 61 74 69 63 | 54 65 78 74 00 00 00 00 |..Static|Text....|
|00006090| 00 00 00 07 00 00 b4 01 | 0a 50 75 73 68 42 75 74 |........|.PushBut|
|000060a0| 74 6f 6e 00 00 00 00 01 | 06 41 63 74 69 6f 6e 01 |ton.....|.Action.|
|000060b0| 00 04 05 06 0c 53 75 62 | 20 41 63 74 69 6f 6e 28 |.....Sub| Action(|
|000060c0| 29 1e 69 66 20 50 61 72 | 65 6e 74 20 69 73 61 20 |).if Par|ent isa |
|000060d0| 44 6f 63 74 6f 72 45 6e | 74 72 79 20 74 68 65 6e |DoctorEn|try then|
|000060e0| 24 44 6f 63 74 6f 72 45 | 6e 74 72 79 28 50 61 72 |$DoctorE|ntry(Par|
|000060f0| 65 6e 74 29 2e 44 65 6c | 65 74 65 54 68 69 73 52 |ent).Del|eteThisR|
|00006100| 65 63 6f 72 64 06 65 6e | 64 20 69 66 05 63 6c 6f |ecord.en|d if.clo|
|00006110| 73 65 07 45 6e 64 20 53 | 75 62 00 00 07 00 00 b4 |se.End S|ub......|
|00006120| 01 0a 50 75 73 68 42 75 | 74 74 6f 6e 00 00 00 00 |..PushBu|tton....|
|00006130| 01 06 41 63 74 69 6f 6e | 01 05 01 05 03 0c 53 75 |..Action|......Su|
|00006140| 62 20 41 63 74 69 6f 6e | 28 29 05 63 6c 6f 73 65 |b Action|().close|
|00006150| 07 45 6e 64 20 53 75 62 | 00 00 04 06 43 61 6e 76 |.End Sub|....Canv|
|00006160| 61 73 10 04 4e 61 6d 65 | 07 43 61 6e 76 61 73 31 |as..Name|.Canvas1|
|00006170| 05 49 6e 64 65 78 0b 2d | 32 31 34 37 34 38 33 36 |.Index.-|21474836|
|00006180| 34 38 0d 54 61 62 50 61 | 6e 65 6c 49 6e 64 65 78 |48.TabPa|nelIndex|
|00006190| 01 30 07 56 69 73 69 62 | 6c 65 04 54 72 75 65 04 |.0.Visib|le.True.|
|000061a0| 4c 65 66 74 02 31 33 03 | 54 6f 70 02 31 33 05 57 |Left.13.|Top.13.W|
|000061b0| 69 64 74 68 02 33 32 06 | 48 65 69 67 68 74 02 33 |idth.32.|Height.3|
|000061c0| 32 0b 42 61 6c 6c 6f 6f | 6e 48 65 6c 70 00 13 44 |2.Balloo|nHelp..D|
|000061d0| 69 73 61 62 6c 65 64 42 | 61 6c 6c 6f 6f 6e 48 65 |isabledB|alloonHe|
|000061e0| 6c 70 00 08 4c 6f 63 6b | 4c 65 66 74 05 46 61 6c |lp..Lock|Left.Fal|
|000061f0| 73 65 07 4c 6f 63 6b 54 | 6f 70 05 46 61 6c 73 65 |se.LockT|op.False|
|00006200| 09 4c 6f 63 6b 52 69 67 | 68 74 05 46 61 6c 73 65 |.LockRig|ht.False|
|00006210| 0a 4c 6f 63 6b 42 6f 74 | 74 6f 6d 05 46 61 6c 73 |.LockBot|tom.Fals|
|00006220| 65 08 42 61 63 6b 64 72 | 6f 70 01 30 07 45 6e 61 |e.Backdr|op.0.Ena|
|00006230| 62 6c 65 64 04 54 72 75 | 65 00 0a 53 74 61 74 69 |bled.Tru|e..Stati|
|00006240| 63 54 65 78 74 17 04 4e | 61 6d 65 0b 53 74 61 74 |cText..N|ame.Stat|
|00006250| 69 63 54 65 78 74 31 05 | 49 6e 64 65 78 0b 2d 32 |icText1.|Index.-2|
|00006260| 31 34 37 34 38 33 36 34 | 38 0d 54 61 62 50 61 6e |14748364|8.TabPan|
|00006270| 65 6c 49 6e 64 65 78 01 | 30 07 56 69 73 69 62 6c |elIndex.|0.Visibl|
|00006280| 65 04 54 72 75 65 04 4c | 65 66 74 02 35 38 03 54 |e.True.L|eft.58.T|
|00006290| 6f 70 02 31 33 05 57 69 | 64 74 68 03 32 35 34 06 |op.13.Wi|dth.254.|
|000062a0| 48 65 69 67 68 74 02 33 | 33 0b 42 61 6c 6c 6f 6f |Height.3|3.Balloo|
|000062b0| 6e 48 65 6c 70 00 13 44 | 69 73 61 62 6c 65 64 42 |nHelp..D|isabledB|
|000062c0| 61 6c 6c 6f 6f 6e 48 65 | 6c 70 00 08 4c 6f 63 6b |alloonHe|lp..Lock|
|000062d0| 4c 65 66 74 05 46 61 6c | 73 65 07 4c 6f 63 6b 54 |Left.Fal|se.LockT|
|000062e0| 6f 70 05 46 61 6c 73 65 | 09 4c 6f 63 6b 52 69 67 |op.False|.LockRig|
|000062f0| 68 74 05 46 61 6c 73 65 | 0a 4c 6f 63 6b 42 6f 74 |ht.False|.LockBot|
|00006300| 74 6f 6d 05 46 61 6c 73 | 65 08 54 65 78 74 46 6f |tom.Fals|e.TextFo|
|00006310| 6e 74 06 73 79 73 74 65 | 6d 08 54 65 78 74 53 69 |nt.syste|m.TextSi|
|00006320| 7a 65 02 31 32 04 42 6f | 6c 64 05 46 61 6c 73 65 |ze.12.Bo|ld.False|
|00006330| 06 49 74 61 6c 69 63 05 | 46 61 6c 73 65 09 55 6e |.Italic.|False.Un|
|00006340| 64 65 72 6c 69 6e 65 05 | 46 61 6c 73 65 04 54 65 |derline.|False.Te|
|00006350| 78 74 18 44 65 6c 65 74 | 65 20 74 68 65 20 73 65 |xt.Delet|e the se|
|00006360| 6c 65 63 74 65 64 20 72 | 6f 77 3f 09 54 65 78 74 |lected r|ow?.Text|
|00006370| 41 6c 69 67 6e 01 30 09 | 54 65 78 74 43 6f 6c 6f |Align.0.|TextColo|
|00006380| 72 01 30 09 4d 75 6c 74 | 69 4c 69 6e 65 04 54 72 |r.0.Mult|iLine.Tr|
|00006390| 75 65 01 0a 50 75 73 68 | 42 75 74 74 6f 6e 17 04 |ue..Push|Button..|
|000063a0| 4e 61 6d 65 09 79 65 73 | 42 75 74 74 6f 6e 05 49 |Name.yes|Button.I|
|000063b0| 6e 64 65 78 0b 2d 32 31 | 34 37 34 38 33 36 34 38 |ndex.-21|47483648|
|000063c0| 0d 54 61 62 50 61 6e 65 | 6c 49 6e 64 65 78 01 30 |.TabPane|lIndex.0|
|000063d0| 07 56 69 73 69 62 6c 65 | 04 54 72 75 65 04 4c 65 |.Visible|.True.Le|
|000063e0| 66 74 03 32 35 32 03 54 | 6f 70 02 36 36 05 57 69 |ft.252.T|op.66.Wi|
|000063f0| 64 74 68 02 36 30 06 48 | 65 69 67 68 74 02 32 30 |dth.60.H|eight.20|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
